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はじめに 

このたび は、 シ ヤー フク 1 リーン コンピュータ、 MZ — 8 0 シリーズ をお 買い 上 
げ いただき、 誠に ありがとう ございました。 

この 解説書 は、 MZ — 8 0 シリーズの B AS I C について、 その 使い方、 文法 
規則 を 簡単な 例題と ともに 説明して おります。 MZ — 8 0 シ リース クリーン コ 
ン ビュー 夕の ハードウェア、 あるいは、 他の システム ブ 口 クラ^の 構成に 関す 
る 事項 は、 それぞれの マニュアルに よってぐ ださい。 

なお、 本 BAS I C 解説書で は、 BAS I 〇 パージ ヨン SP — 5 0 3 0 に 従つ 
た 説明が なされて おります。 

この 「MZ — 8 0 シ 1 リース BAS I C 解説」 は、 サービス お客様 ご 相談 窓口 
一覧表と ともに 必す 保存して ぐ ださい。 万一 ご 使用 中に わからな いこと ゃ不都 
合が 生じた とき、 きっとお 役に立ちます。 



MZ — 8 0 シリーズ は、 クリーン コンピュータ を 設計 思想と して 開発され ております。 製品 定格 
および 命令 仕様 は、 将来の バージョン アップで 予告な しに 変更 • 追加 • 削除され る こと ガ ありま 
す。 そのため、 提供され る モニター （ROM で 提供)、 システム プログラム （力 セッ卜 テープ まだ は 
ミニ フロッピー ディ スケッ 卜 等で 提供） の バージョン ナンパ 一に は 特に ご注意 を お願い致します。 
記載事項 について 間違い はない ものと 信じて おります が、 本 資料 は、 MZ — 80 シ リースの 已 ASIC 
を 御 理解して いただ < だめ 作製し だもので あり、 パ一 ジョン アップに よる 内容の 相違、 誤植、 記 
載 ちれな どから おこる 問題点に 関して は、 原則的に 責務 は 負い かねます。 
尚、 本書 作製 は モニター SP- 1002、 BASIC SP-5030 にもとづいてお ります。 
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にんげん は 昔から 宇宙からの 光が 好きだった 

だからい ぐ 時代 も、 曰か 暮れる と 草原に 寝ころび、 星 降る 空 を 眺め; e も 

のだろう。 ギ りシャ 神話に てて ぐる あの 若者 も、 そう やって 宇宙 に 広 

がる 光の 夢 を 織って いたの だ。 やかて、 彼 は 金 羊毛 を搜 して 船出した。 
目 ざす は 未来 …… 

そう、 南の 地平線に くっきり 輝ぐ アル ゴ 星座 はそんな 星 だ。 そして この 
星座の シンボル は 若者の のった 船。 勇気、 未来、 探究、 そして 權れ とい 
つたち の を あらわす 帆船 だ。 

若者の 船の ように、 MZ — 80 クリーン コンピュータが 船出す るの はもう 
じきの こと …… 。 あなたの 夢と そんな ふうに 出会うた め、 シャープ ォ 1 j 
ジナル の アル ゴ 船の マー ヮを かたどって みました。 
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あなたへ こっそり 伝えたい こと 

ようこそ BAS I C ランドへ 已 AS I C と は 

コンビ ュ一タ だって B AS I C を 暗記す る！ BAS I C を 読み込む 

BAS I C は、 会話 ガ お好き BAS I C を 読み込む 

キ一 ポ一ド 吏い 方 キーボード 

黄色い キ一 は、 魔術師 キーボード 

BAS I C の 通へ、 いざ 出帆 ゲームで あそぶ 

エリスの ファッションショー ゲー^で あそぶ 

時計の 話と 考えな し 、と 負ける ゲー^の 話 ゲ一ム であ そ'； 5; 

そし て プロ クラ^の 世界へ ゲ一ム であ そふ' 

タイ レワ 卜 モードって 何だろう PR I NT 

四 則 茧箄も パッチ リ PR I NT 

ス卜 リンク 9 計冓式 9 PR I NT 

フリン 卜の 第 1 接近と 第 2 接近と は PR I NT 

走れ コンピュータ RUN 

L I ST て はやわかり L I ST、 NEW 

エラーし 1 \ こっち やな あ エラ一 表示 

デ一 卜の 場所 は？ （知って ます か 9 …… ） 

命令 25： を 唐す マ カーソルの 使い方 

命令文 を 直す ！ 力一 ソルの 使い方 

コン 7 と セミコロンの 大 研究 コ ン マと セミコロン 

コロン だほう^い いこと も ある 多重 命令、 SIZE 

A = B と B=A は 同じな の"？ r =」 の 使い方 
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コンビ ユー 夕の 大好きな 変数 は 

地球 を計箄 する 

天才 アルキメデスと 謎の 兵隊 

関数 家の人々、 個性 いろいろ 

自由な 関数 定義 …… DEF FN 

こちら は I NPUT、 返事 かほし い！ 

フロ ポースの 返事 は イエス か ノー か 

DATA さん、 お 手 を どうぞ、 READ より- 

GOTO に はさから うな 

I F …… THEN の 世界 

I F …… THEN とその 仲間 だち 

判断す るなら I F …… にお まかせ 

数の 合言葉 を搜 しだせ 

FOR …… NEXT は 緣 り 返しの 達人 

ル一フ の 中に ル一フ か 見える 

大きい 順に 並ん てお <れ 

直角三角形 はなん ほてき る 

PR I NT 艾を だすけ る 三銃士 

RESTORE て ビッ! T ン 

おしゃべりな ス卜 リンク 

へだな 俳句 も かすうち や 当 だ る 

LEFTS, M I DSs R I GHTS 

LEN はス卜 リンクの 物 さし 

ASC と CHR$ はしん せき 同志 

STR$ と VAL は 数字の 変換 

願いまして ¥123, 456,789 円 也 

いま、 何 どき だ 9 (知って ます か 9 …… ） -… 

単利と 複利て どうちが う 7 

年金 を 5 年間 預けて おいだら 

サ フル一 チン は フ0 クラムの 切札 

止めて、 調べて、 CONT する 

ON …… G〇T〇 …… てまと めて 飛ん て！ …- 



変数の 槿類 

…… 計算の 優先順位 

三角関数 

標準 関数 

DEF FN 

I NPUT 

I NPUT 

•READ- DATA 
GOTO 



F. 
F- 
F- 



FOR- 
FOR- 
••■ I F- 
FOR- 



•THEN 
THEN 
THEN 
THEN 
NEXT 
NEXT 
THEN 
NEXT 



•CURSOR, TAB( )、 SPC( ) 

RESTORE 

ス卜 リング 変数 

ス卜 リング 変数 

■■•LEFTS, MID$、 R I GHTS 

し EN( ) 

ASC( )、 CHR$( ) 

STR$( )、 VAL( ) 

LEN( )、 M I D$( ) 



+ GOSUB. 



■••RETURN 

CONT 

-ON. '-GOTO 
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ON …… GOSUB はサ フル一 チンの 集団の 使い 5 

1 次元 K 列 は 100 人力 

ス卜 リンク 変数に も 配列 ガ ある 

配列 は ファイル 作りの 名人 ■ 

菜 語に 佻 戦す る 

2 次元 配列 は、 さらに 強力 

九九の 計篝表 はいか か 

穴き な 数と 小さな 数 

メ」\ さな 数と 大きな 数 

数 はデタ ラメな 数 

RND 関数 Ttt ィコロ をつ くる 

» 数の 家庭教師に 早な わり 

確率 的に HI 形の 面樓を 求める 

カジノて なせごう $$ スロッ 卜 マシン $$ 

RND て 練習問題 をつ < ろう 

SET する 1 ? それとも RESET する？ 

テレビの 原理 を 紹介す ると 

野生の スケッチ ゥサ ギとキ ツネ 

卵形の ク ラフの 秘密 ゥサ ギとキ ツネ 

GET は 待ったなしの キ一 入力 

陣取り ゲー乙 を のぞし 、てみ ません か 

T I $ は デジタル 時計 



ON -GOSUB 

D I M、 1 次元 配列 

D I M, 1 次元 配列 （ス卜 リング） 

1 次元 配列 

1 次元 E 列 （ス 卜 1 リンク） 

D I M, 2シ^ 配列 

2 次元 8S 列 

指数 表示 

指数 表示 

RND( ) 

RND( ) 

RND( ) 

RND( ) 

RND( ) 

RND( ) 

SET. RESET 

SET、 RESET 

SET. RESET 

SET, RESET 

GET 

GET 

T I $ 

パリの 友人に おはようって 霪話 する 時間 は 7 T I $ 

音楽の たのしみ （S 演奏家 MZ — 8 0K 氏 を 訪ねて） TEMPOs MUS I C 

「楽 gg はス卜 リンクに し^す。」 （同氏 談） TEMPO、 MUS I C 

フレ 1 J ユード • ァレ クロ • アマ ービレ TEMPO. MUS I C 

あな だか 作る 音の ライフ ラリー TEMPO、 MUSIC 

あすの 朝 7 時に ぜつだい S き るんだ （応用問題） 

65 用 問題 を ふだつ （ns 用 問題） 

名 薄 を 作る ひとに そっと 教えたい 用 問題） 

ポ 一力一 野郎に カード を 配らせる と …… 用 問題） 

フ 口 クラ^の 記録 （SAVE) SAVE 



65 
66 
67 
68 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
80 
81 
82 
83 
84 
85 
86 
87 
88 
89 
90 
91 
92 
93 
94 
95 
96 



^卿 やま W^S^ 管 微 難 稱尊郷 ，顯粥 郷珊ぜ ま 聽然齊 纖 



m 
m 
m 
m 
？ d 



あ 

m 
m 

CO 

お 

お 

m 
m 

-m、 

m 
:. に 

键 



VER I FY と LOAD の 使い方 VER I F 丫、 LOAD 

データ だって 力 セッ卜 テ一フ にと つてお ける …… WOPEN、 ROPENs CLOSE 

苜棻史 の？ I8g 記 術 PRINT Ts INPUT T 

ィキな 先生 かつ < つ だ 成績 リス 卜 ファイル 処理の 例 

音楽の ライフ ラリー を テ一フ につ <る ファイル 処理の 例 

データ/ X ンフは コンビ ユー 夕のお 家芸 データ/ 、ンク 

電話番号 簿もデ 一夕/ X ンヮの ひとつ デ一 X ンヮ 

モー ルス 信号て SOS SOS ス卜 リングと MUS I C 

ッ一 ツー 卜 ン卜ン ツー 卜 ン卜ン ス卜 リングと MUS I C 

そして 果てしな < つづ < 「時」 …… （万年 暦） 

宇宙 豆 事典 （知って ます か 9 …… ） 

BAS I C 命令の まとめ （SP — 5030) 

直接 実行 命令 

ステ一 卜 メン卜 

機械語との リンク 命令 

ス卜 リンク sasm 令、 関数 

»麵» ； 

譎理演 » 子、 その他の シン ポル 

エラ一表示 

ffi 秒 400 万卜ン すつ やせ 細る 太陽 （知って ます か 7 …… ） 

ディ スフ レイコ一 ド 

特殊 文字コードと メモリ一 マップ 

アスキー コード 表 

機械語との リンク 

機械語 フ 口 クラ^の 作成 

USR 命令と 機械語 プロ クラ^フ アイ ル 

テレビ 画面の 構成と 特殊な 制御 命令 

I /〇 入出力 命令 

令 表 

I X— ソナル • コンピュータ 用語集 

701. 260 時間 （知 つてます か 9 …… ) 

BASIC SP-5030 仕様の まとめ 
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い^あな たは 広大な コンビ ュ一タ の 世界へ 旅立とうと しています。 それ はちょう ど 無限 
の 宇宙空間への 佻 戦の ょラ に、 未知の 可能性に あふれた 旅立ちに ちガ いありません。 

さあ 出発て す。 THREE TWO ONE ZERO ！ LET'S GO! 






あなたへ こっそり 伝えたい こと 

新し < 何 か を 始める に は、 まず 実際に 「やって みる」 
ことです。 でも 「やって みる」 といっても、 初めての 
人に とって は なかなか 勇気の いる こと だし、 第一 やつ 
ぱ りしん どい ものです。 水泳の 本 を 読み、 畳の 上で 練 
習 をした からといって、 すぐに 通に 飛び こんだら 溺れ 
てし まいます。 それ は 知識 をた < わ えても、 「勘」 がつ 
いていない からです。 「勘」 をつ ける に は、 やっぱり 基 
礎から 勉強して スマ一 卜に 「やって みる」 ことです。 
コンビ ュ一 夕 はすこし ぐらい 使い方 を まちがっても、 
あなた を 危険な 目にあわせ るよ ラな ひどい 道具で は あ 
りません。 使い なれたら 手 離せない < らい 便利な 道具 
です。 

この 本 は 気楽に コンピュータ を 「やって みる」 ことで 
コンビ ユー タの 本質 を 理解す るた めの 手引書です。 コ 
ン ビュー タを 横に 置いて 使いながら 読んで みて 下さい。 
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人間 ガ 会話 をす るに は 言 菜が 必要て す。 どんなに 高い 能力 を 持つ 人達て ち、 お 互いに 通じ合 ラ 共通の 言 
葉がなくて は、 力 を 合わせて いろいろな 仕事 をな しとげる こと は 不可能て しょう。 
コンピュータと 人間との 場合 も 同様に、 お 互いに 通じ ぁラ 共通の 言 菜ガ必 要て す。 共通の 言葉 を 持つ こ 
とに よって 、コンピュータに いろいろな 命令 を 与える ことが てき、 その 組み合せ を 工夫す る ことによって 
いろいろな 仕事 を 実行す る ことかて きる のて す。 このような 言葉 を 「コンピュータ 言語」 といい ます。 
人間の 使ラ 言葉に も、 曰 本 語 や 奂語ゃ ドイツ語な どのよ ラに、 いろいろな 種類が あります ガ、 コンビ ュ 

一夕に 使われる ものに も、 その 用途に じていろ いろ あり * す。 マイクロ コンビ ユー タの 場合、 「BA 
S I Cj と 呼ばれる コンピュータ 言語が 広く 使われて います。 BAS I C はやさし い 英語て てきて おり、 
コンビ ユー タガ どんな 仕事 を すれば よい か を 示す 一連の 命令文、 すなわち 「プロ クラ 乙」 を人閭 とコン 
ビュ一 タガ 対話す るよう な 形て 作って いぐ ことかて きる のが 大きな 特長て す。 
どんな コンビ ユー タ 言語 を 与えて やるな は、 ちちろん あなたの 自由て すガ、 これから 以後 当分の 間 は、 
BAS I C を 使う こと を 前提と してお 話 を 進める ことにします。 




ヒ f ナース ""一 I レ 八 一 （、ス シン ボリ'' 'ヮ f ン ス卜ラ フシ ヨン つ 一 k 

Beginner s Ah-purpose symbolic Instruction Code 

初心 S 向きて あらゆる 目的に 合う 記号 を 使つ; 5 命令 語 



さあ、 それて は、 これ; tr ら あなたの コンピュータの 運 is 開始て す。 ます、 



後ろの POWER の スィッチ を 入れて < ださい。 やがて テレビ 画面 I. 



|SP-700X はモ 二？ 一 ク、 

(1ヾ 一 ヒ3 レ寸ゝ I、：、 一お' -、' 

. さらき 由 き^だぶ. 



- - MONITOR SP- 1 00X 




と 表示が 出ます。 そして 画か チカ チカと 点滅して いる はすて す。 点滅す る 画 を カーソルと いい、 キー ボ 
ードの キー をた たぐと、 キーの 文字 や 記号が ここに あらわれ、 カーソル は 右側に 移動して、 つぎの キー 
入力 を 待つ 状態になります。 

この 状態て は、 コンビ ユー タは まだ ほとんど 何にもて きません。 まだ あな S と コンビ ュ一 タとガ 互いに 
理解し あう た めの 共通の 言葉 を 覚えて いない からてす。 てきる こと は、 このような 言葉 を 覚え込む ため 
の 能力 だけて す。 



私 は mtii ィ なさ 天才 なの だ'. 

あな T: ヒ 言き リ令 レ、. あなたの 命 今/ r 

し r= が )飞 . 大 い /-- Hat も い の も 賓 

ま厶 はま /"='<^7 も 知らない. 

早く f 妙き す = い の 7b" 



ま^" 二ん な こ ヒ^! う 
雜 力も^ いくせ レー …- 




人間の 場合、 ひととおりの 言葉 を 覚え込む だめに は、 長い 年月と 努力^ 必要て すガ、 コンビ ュ一タ はも 
ち ろん、 ほんの わす かの 操作と 時間 ガぁれ ば 事足 り ます。 力 セッ卜 テープから このような 言葉 を 教え込 

んて やる こと を 「し 〇AD する j といい ます。 
キーボードの 中から 文字 を 拾って 



'回- 



D — CR 



の 順に、 たたいて ぐ ださい。 ちし、 途中て まち かえて キー を だ だいて しまつ だら、 



NST - DEL を だたいて、 その 文字 を 消し 改めて 正しい 文字 を 拾う か、 




うまぐ いきまし たか 7 正しぐ キー入力され ていだら、 下の 
点滅 は 消えて いる はすて す。 

これて、 コンピュータに 共 適 言 SS を 教え込む 手 はすな すつな 
り 整いました。 

それて はテー フレコ ータの PLAY ボタン を 押し、 コンビ ュ 
一夕に BAS I C 言語 を 覚え込ませて < ださい。 



I RECORD REWIND FFWD PLAY STOP EJECT 
1 • « t>> > o ^ 

















画面の ようになります。 そして カーソルの 




0 p 



エー 卜 もし 二の 店 か" 
閉 びいたら. あそ： 

の ； fi に 立？? "フて 



よ < 傲く 運転 手 じ や] n い， どんな 筏 な 、 
ili'i 灵も き 5 んと 命令 ど あ' リ 党え でゃパ く w る 




途中る '义' 辱な、 
： とか-あ a は'' 
ちゃん ヒ r-.i"n 
でく vni "しぬ 



そのけ、 リ 命 今の 出 し卞 
^ちょ化？^^ぇ？も 
意 呔1 ォ通 じ ないぶ 




** Monitor sp-ioox ** 
% LOAD 
t PLAY 
LOADING BASIC 
本 SHARP BASIC SP-500X* 
• * • • BYTES 
REAPY 

力- ソ I ひ 



セラが く 1ぇ 込ん た'' 

BASIC u^:?P^>tt.2 

しま ラょ. it 中^う フカ' リ 

！：テ 原 も らな し、 よう '= 
しな （ちゃ一 

カ-ソルの =f 力 チカ は） 
コンピュータか:' あなた 
に^し 耳 （^令し？ 
くお' さし、 ヒ ft リカ、 け 
^いお？ なの だ' ノ 



これで コンビ ユー 夕 は BAS I C を 学びと りました。 

今度 は あなたに BAS I C を 使いこなして もらわな ぐて はなり ません。 

そうて す、 あなたの 学習の 開始です。 

コンピュータ を 前に 置き、 実際に 動かしながら BAS I C を 学んで ぐ ださい。 
最初 はいろ いろと ためして みる ことが 大切です し、 それが 楽しぐ 学 ふ' コッ てす。 
どの キー をた たいても、 決して こわれる 心配はありません。 キー をた たいて み 
て、 コンピュータ ガ 何と 答えて < るかた めして こ' らんなさい。 万一 途中で 無限 
： 繰 り 返す よ うな 動作が 始ま 



) たら SH I FT キー を 押した 状態で BRE 



AK キー を 押してぐ ださい。 コンピュータ は 仕事 を 中止し、 命令 待ちの 状態 I 
かえります。 



13 



< 

Q タ 



■ 

1 ヌ 



月 ¥ 



Q タ 



水 £ 



A チ 



主 分 



円 秒 





生 翻 



3： 

円國 




カナ - mm 



あな だガ コンビ ユー 夕へ 話しかける 手段と なる もの、 それ ガ キーボード てす。 それぞれの キー は 色 わけ 
して あ り ますが、 1 吏い 方に よって、 つぎの 2 つに 分けられます。 
黒と 青の キー …… 全部て 204 種類の 文字 や 記号 を 入力す るた めの ものて、 ひとつの キーに 3 つす つ 文 
字 や 記号 ガ あります。 

寅 色の キ一 いろいろな 制御 をす る だめの、 機能的な 働き を もつ だ キーて、 いちばん 手前に 並ん 

ています。 



> 

W テ 



■ 

2 フ 



S ト 




SHIFT 



CLR 
HOME 



INST 
DEL 



SPACE 



个 
* 



BREAK 



C R 



SHIFT 



CLR 
HOME 



SPACE 



个 
* 



I CURSOR 



BREAK 



C R 



SHIFT 



B 
—ヲ 



© 文字、 記号の キー を だ だぐ と テレビ 画面に は 下図の 色刷りの 部分の 文字 や 記号が 表示され ます。 



n iq 



ヌ ■ 2 フ 



，，，， 



や 國8 ュ 





) 

園ョ 







□ 



， 

a 



ィ 國8ス»']11 力 iY ン 



m a 1 9 I 



-I ^ Lad t ^ 



サ iC ソ ヒ コ ミ iM モ國， ネ 



^ 1 



B~ [m~ [gn \£l n| 
LS°, Q. LBx ^ッ a 



© 特殊 キ一 の 中に ある SHIFT キー を 押しな ガら、 文字、 記号の キー をた^ ぐと、 下 S の 色刷り 



の 部分の 文字 や 記号が 表示され ます。 



■ 譯 譯 ■& 

3 ァ 疆4 ゥ ■ 5 ェ 隱6 ォ 



『 



E ィ ス 麗丁 力 ■ Y ン 疆11 ナ 



■ D シ 



X サ ■〇 ソ ■ V ヒ 



» m 

8 ュ疆 9 ョ 疆0 ヮ 



O ラ麗 Pt^ = へ 



G キ ヮ ■ J マ ■« ノ ■ しリ麗 5 レ 隱田ロ 



N5 



CLR INST 
HOME , DEL 



i^B b9 mM 

'■i. を. 



J ^ J E B S3 

[o [□ [□ rs 

E^J loll [g^J [O^J 

Bx] in ゥ i BJ 

1F1 鬮 



カナ 
メ國 英数 



，ッ 



E ： つ。 コォ l ia-l 



© 特殊 キーの 中に ある SH I FT キー を 押しな ガら カナ • 英数 キ 一を だ だ < と、 今 まて 緑色 だつ 
^ラン フガ 赤に 変わります。 この あとて 文字、 記号の キ 一をた たぐと、 下 13 の 色刷りの 部分の 文字 
や 記号; 表示され ます。 



M n ■$ ■% ■& 麗， 麗（ 麗） 

2 フ圍 3 ァ國 4 ゥ疆 5 ェ國 6 ォ 翻 7 ゃ讕 8 ュ疆 9 さ 



リ十 一 
0 ヮ漏ー ■ 



E2/ 



酽 



D J F J G J hJ J J K J L| 



國圄 s 圇圄 
^国 圔圄圄 



h ^ E" P 



SHIFT 



INST 
DEL 



SPACE 



UHSOH CURSOR BREAK 



C R 



SHIFT 



曰 
― 



この あと、 引き続き ® に 示す 文字 を 表示す る 場合に は 
は 緑に 変わり ①の 状態に もど り ます。 



キー をた; ^ いてぐ ださい。 ラン フ 



特殊 キーの 働き ほ= 



カーソル コン卜 ロール 用 特殊 キーに はォー 卜 1 J ビー 卜 機 «ガ あり、 

キー を 押し 続ける と カー ソ' し 操作 ガ碟り 返されます。 




URSOR 



CUF 



URSOR 



BREAK 



テレビ 画面に 表示され ている 命令 を コンビ ユー タに 伝え; C 後、 カーソル かつぎの 行の 
先頭に 移ります。 CR ： carriage return の 略。 

カーソルが テレビ 画面の 左上す みに 移ります。 

カーソルの すぐ 左の 文字 を 消去し、 右側に 続ぐ 文字 を 1 字 分 左側に 移動させます。 空 
いだ 右端 は フランクになります。 DEL ： delete の 略。 

カーソル; tf 下に 1 字 分 移ります。 もし カーソルが テレビ 画面の 下端に あった 場合に は 
表示が 上に 1 行 分 順送り されます。 なお、 カーソルが 通 週しても 文字 は 消えません。 

カーソルが 1 字 分 右に 移ります。 カーソル； 右端に ある 場合に は、 1 行 下の 左端に 移 
り ます。 なお、 カーソル ガ 通過しても 文字 は 消えません。 

コンピュータに 力 セッ卜 テープから 入力して いると き、 まだ 力 セッ卜 テープに 出力し 
ている とき は その 動作 を 中止し ます。 



SHIFT) を 押しながら 特殊 キー を だた < と、 特殊 キーの 働き はつぎの ように 変って きます。 
C し R | 



HOME 

I nst] 

DEL ' 




cursor) 



テレビ 画面の 表示 を 消去し、 カーソル ガ 左上す みに 移ります。 だ だし、 それによ つて 
プロ クラ 乙 や 変数の 内容 は 変わ り ません。 CLR ： clear の 略。 

カーソルの 位置に 空白 を揷 入し、 右側に 続ぐ 文字 を 1 字 分 右側に 移動させます。 
INST ： insert の 略。 

カーソル ガ 上に 1 字 分 移ります。 だ だし、 カーソルの 上端に あるとき は 動きません。 
なお、 カーソル 力' 通 週しても 文字 は 消えません。 

カーソル ガ 1 字 分 左に 移ります。 力一 ソル ガ 左端に ある 場合に は 1 行 上の 右端に 移り 
ます。 なお、 カーソル ガ 通過して ち 文字 は 消えません。 



break] フ 口 クラ^の 実行 を 中止し ます。 



さあ 楽しい 航 ig の はじまり てす。 最初に 私たちの 乗る 帆船 を 描いて みまし ょラ。 それ は カセッ 卜テー 
プ 「APPL I CAT I ONSj の 中にはい つてい ます。 「BAS I C」 の 読み こみと 同様に、 次の 
手順 を 追って 読み こませます。 だ じろ かすに^ めして みる ことが 一番 勉強になります。 



さて 無 寧に 出航 を 終えた ところて、 祝賀の バー ティの 席ぺ 降り 
て 行って みる ことにし ましよ ラ。 ちょっとし e 燊 しい ショー や 
ゲ一^ ガ行な われて いますよ •••••• 



V ，，ェ 1 リスの ファッションショー 



1 〇 1 号 キャビン （船室） て は、 ファッションショー ガ行な わ 
むてい るよう てす。 そして 何 か 音楽 もき こえて きます。 アル コ 
号の 若者 ちの アイドル、 ェ 1 J スガ 登場して いるの てす。 この 

ショ一 は 同じ テーフ の A 面て、 船の 模様の つぎに 入って います 
から 同じように 




回 回囚回 



とキ一 入力す ると テ 一 フカ' 走り出す はすて す。 もし テーフ レコ一 タを STOP としてお いだなら 
コンピュータ は 前の よ ろに 「P LAY ボタン を 押して ぐれ」 と 言って 来ます のて I PLAY I ポタン 



を 押せば いいのて す。 LOAD ガ 終つ だら、 前と 同じように ^JMiNJ [crI としてく ださい。 
おしゃれな エリスと 音 癸と …… 1 0 1 号 キャビン はとても 楽しい 雰囲気て す。 



コンビ ユー タは特 言 十 を 内蔵して います 

この 時計 は 電源 スィッチ を 入れ S 瞬間から 「時」 を 刻み はじ 
め、 その 最初の 瞬間に 時計 は 自動的に 

00 時 00 分 00 秒 

に 合わせられます。 「0 0」 と 書 ぐの は 意味が あるの てす。 
コンビ ュ一タ 内の 時計 は 実際に は 時、 分、 秒 それぞれ 2 ケタ 
ガ つな ガっだ 6 ケタの 数に なって いるから てす。 

コンピュータの 電源 スィッチ を 入れた の はおよ そ 何分 前て し 

たか 9 …… ちょうど 3 0 分 前なら この 6 ケタの 数 は、 
003000 

となって いる はす。 さあ、 いま まてと 同じ 手順て、 つぎに 記 
錄 されて いる 「置き時計」 の プロ クラ 乙 を [Q 回^ l^J して 
みて 下さい。 

カセッ 卜テー ブガ まだ 動き 出し、 止まつ; 5 ところて コンビ ュ 
ータは " READY ' 'とし OAD ガ 完了し^ こと を しらせて 
ぐれます ね。 そこて 最初に、 コンビ ユー タ の 時計 を あな だの 
時計に 合わせます。 だとえば、 あな だの 時 計ガ 現在、 午前 1 0 
時 35 分 1 2 杪を さしてい ると して、 午前 1 0 時 36 分ち よ 
うどに 合わせる ことにします。 それ はつぎの ような キー入力 
ガ必 要て す。 




mmrsiFFimroifsirsToToir 



そして 1 0 時 3 6 分になる と 同時に ICR | キー を だ だくと コ 
ンビュ 一タ 内の 時計 も 合う わけてす。 

あと はもう r^iuip する だけの こと …… 




10 2 号 キャビンて は、 気の いい 船乗りた ちガ ワイ 
ワイい いながら 山ぐ すし ゲ一 乙に 興じて います。 さ 

つ そぐ この フ0 クラ^ を [O^ISIS する ことにし 
ましょう。 どうす るって 7 …… 手順 はい ままて と 全 
ぐ 同じ こと。 この プ一 乙の ルール はつぎの 2 つ だけ。 

♦ あな; 5 と コンビ ユー タガ 交替に、 どれ かひと つの 
山から 1 個 以上の 石 を 取って いきます。 

辜 山ガ だんだん 少なぐな つて、 最後に 残つ だ 石 を 取 
つ; 5 方ガ 勝ち。 




フ 口 クラ^の LOAD は 終わり まし だか 9 …… 
さあ、 ここて P O [^と 打って ゲー^ 開始て す。 



CR V 「GR をた だくの をお 忘れな く 



：れ からさき は あなたが 考える 番 てす。 考えない と 負ける ゲ 一^へ ご 招待 ！ 



RUN 
マ/^ ス i, ハ ？ 







はじめに 山の 数 をい ぐつ にす るな コ 
ン ビュー タ なきき ます。 
だとえば 3 つに する に は 
[3] fCRl 



つぎに 先手 • 後手 をき いてき 9； す,, 

先手 をと るに は [g [CR] 

後手 をと るに は [XI fCRl 

を 打ちます。 



いよいよ プー^ 開始 ！ 
3 つの 山 か 表示され まし だ。 
そして、 
K ノ ヤマニ シ マスカ 9> 園 



と 打って 行きます。 山の 数 は 1 なら いま [Y1 「CR| と O つて 先手 をと 0 ときいて き 》 す， たとえば、 

8 まて 指定て きます。 ましょう。 r^ir^i とします。 つぎに 

イク ッ卜リ フス 力 7画 

ときいて き だら 85 る 石の 数 を キー 入 

力し ます。 だとえば、 mrcRi^-- 

すると、 第 2 の 山なら 石 を 5 個と る 

ことにな り ます。 



いままで 見て きた コンビ ュ一タ の 働き は 何に よるの だろう 7 力 
セッ卜 テープの 中に ある もの は 何 …… これ こそ あな だの 棄り 

だし だ 箱。 BAS I C プログラムの 世界な のて す。 ゲ一 乙に は 

ゲー^の だめの、 時計に は 時 gt の ための フ 口 クラ 乙ガ 作成され 
ている のて す。 ここて プロ クラムと いう もの ガ どんな もの か、 
ちょっと のぞいて みます。 キー をつ ぎの よ o にだたい てぐ ださ 
し、。 

ILI! I I^EjlCRj 



画面に つぎつぎ 現われた のガ 山ぐ すし ゲー^の フロ クラ^て す c 
いま あな^の 船 は ゆつ ぐり と 軸 先 をめ ぐらし、 進路 を^つ すぐ 
目的地 ぺ向 けだと ころて す。 

そう！ …一 目指す の は 自分で プロ グラ厶 を 作成し だり、 直し だ 
りで きる ょラ になる こと。 




もしお 望みなら コンピュータ を 電卓の ょラに 使う 
こと もてき るの てす。 このような 動かし 方 を 「タ 
ィレク 卜 モード J ともい います。 ためしに 電卓と 
同じよ ラに 

5 + 8 = 



と キー入力して みて < ださい。 + は SH I FT 



キー を 押しな 力' ら GtJ キー を だ だけば てきました 
ね。 

てち コンピュータ は、 テレビ 画面に は キー入力し 

だとお りの 文字し か 表示せ す、 もちろん icrI キ 
一 をた だいても 計算 は 実行して ぐれません。 
あなたの コンピュータと 電睾と は、 そこ; tf 全然 巽 
なって いるの てす。 コンビ ユー タに 必要な こと は、 

5 + 8 = を どうしろ というの か、 という 命令な の 
てす。 



アン 八 °ソ は 0 円 に 
クリ-ム だ ソ 170 円 
だ がら 足し 蘇す ると 

工―ト 320闪« 




'ZjlL 左ゃリ なさい,, フ？. 先 ま • 

二 in^ "^せ 》ヒ いうの か. 
ニ^ち "？？さ. 丄 いうの か 
二！^ ち 'tt 箄し 3" ヒ いうの か 
意 + 尊し r: 結果 を "害け 丄 いうの》、 
ほ フさリ しで <wtt;<^ ゃリ ようか" j 
ナ よいよ ft 生。 だフ乙 ぼく. い 3 んな 
二と か' 'て-ささんだ' もん ― 




PR 1 NT 

コンピュータ を 電卓と 同じよ^に 使うた めに は、 5 + 8 の itS 結果 を テレビ 画面に 表示させる こと ガ必 
要て す。 そのための 命令と して PR I NT 命令と いうの があります。 これ を 使って つぎの ような 順序て 
キー をた たいて 命令 を 伝えて みま しょ う。 



EE 





[NI 






0 


[81 


CR 



テレビ 画面に は、 キー をた たぐに つれて、 つぎの ょラな 文字が 表示され ていぐ はすて す 力" 1 、 あなたの 場 
合 はいかが てす か 7 

さあ、 どうぞと いう 意味 

--… 5 + 8 の 結果 を 表示しなさい、 そして 
命令のお わり を 示す ICRl キー を だた ぐ と 
一… これ 力 'PR I NT 命令 を 実行した 結果 

おつぎ は 何 を やります か 

カーソル 



R E A D 丫 

PR I N T 5 + 8 

1 3 

READY 



20 



PR I NT 命令 を 使って、 もう 少し いろいろな 計算 を やって みません か マ …… もっとけ; e 数の 多い 演算 
とか、 何回も 足し算 を 続ける 計算と か、 そして 引き 篝も 。 

もし、 あなたが 掛け算 や 割り算 まて 手 を 拡げ だぐな つたら、 コンビ ユー タは、 S 適の 数学 記号と は、 ち 

よつ と 違った 記号 を 使って いる こと を 知って おいてく ださい。 
「掛け算の 記号 • ァスタ り スクと 呼ばれて います。 



つまり 

3x5 のこと を コンピュータて は 3-5 
6+2 " 6/2 

てな ぐて はなら なし 、のて す 0 



( ) つき 計算 



コンピュータ は、 普通の 電卓の 計算より はるかに 複雜な it 箅式も 気て やっての けます。 かっこつ き 計 
算ガ それて す。 だ だし 数学 記号の 場合 

3X6X C6 + 3X I9-2X (4-2) +1 ！ 〕 
のように、 かっこの 種類 を 違えて 書きます ガ、 コンビ ユー タの 場合す ベて 一 欞 類、 （ ) だけて 間に合 
わせて います。 

3 • 6 • (6 + 3 • (9 一 2 - (4-2) +1 ) ) 
このよう にしても、 コンピュータ は、 内側の かっこ 内の 計箄を 先に やらなければ ならない、 という ルー 
ルを 忘れて しまつ だり、 間違えたり はしない からてす。 



( ) はいく: つ 7 も 
がま K) ない けビ （の 数ヒ） 
の $化 は^じ I： ならな (《 
エラーに ^フ？ しま ラょ 




掛けお' '4(3- 2) と 
害い Z ぼ P B ^i いだ' 
'おす' #ズ（3- 2 ) じ 
童いて （HI 給ん 



PR I NT 
5 

PR I NT 

200 
PR I NT 

フフ 
PR I NT 

25 
PR I NT 

1 



(6+4) ノ （6 — 4) 

3 ： (5 + 9 - (9-2)-6/(4-2)) + 5 
(3 + 4) • (5 + 6) 
C1 0 + 20/6 • (2 + 3) 
(1 0 + 20/(6 • (2 + 3)) 




PR I NT 3+5 J 



そして^ Bj を; 5 だくと 8 になり ますね。 て は、 ここて クォーテーションマーク 「"」 て 計算 式 を 囲ん 
てみ てぐ ださい。 



PR I NT "3 + 5 " そして 
3 + 5 



おや マ …… 違つ だ 結果 ガ 出て きまし; g ね。 もう ひとつ だけ だめして みま しょう。 



PR I NT "HE 



FR I END" ICR] 



" "てぐ ぐつ だ 文字 や g 己 号ガ、 そつぐ り そのまま テレビ 画面に 写し出され るし ぐみ になって いるの て 
す。 この クォーテーションマークの 中に ある 文字 や 数字の 列の こと を 「ス卜 リンク」 といい ます。 
String と は、 糸と か、 一連、 一列な どと いう 意味て す。 

PR I NT "3 + 5 " PR I NT 3 + 5 

ft . ^ 



これ ガス 卜り ング 

つ ズ 一 亍 ― 之 ノ：^ 、ノフ —— つで <r<rps;n"r 



これ は 計算 式 
ス卜 リンクて 



ス卜 リンクに ついては、 まだまだ 多ぐ のこと を 知ってい だ だぐ 必要 かあります。 そして それら を 自由に 
< 吏 いこ なすこと により、 コンピュータの おもしろさ ガ 倍増す るので す。 
てち、 それ はちつ と あとの、 お楽しみ …… 。 



PRINT "I 
LOVE YOU" 





スト リンゲ' なの は 
気が' フか ない よ 



今後、 かなり 数多ぐ お付き合いし なぐて はならない 命令 語て す。 その だび に PR I NT と 入力す るの 
は 面倒と お考えの 方 は _ — _ _ 

曰六5|(：13：フィージンゥ 
さ。 ？と 思ったら 
さっそく 

v t-t uz 二" らん 



PR I NT の 代りに ？ 

をた だいて < ださい。 コンビ ユー タの 中て は、 

9 を 自動的に PR I NT と 読み かえて <れ ます。 

？ 3 • 5 
1 5 

？ (3 + 4) • 1 0 
70 
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PR I NT 命令の あとに は、 ス 卜 1 」 ンクゃ it 算式 などの 複数個の 項目 をつ けて やる ことが てきます。 そ 
して、 そのと き 各項 目 は、 セミコロン や コンマて 分離して やらな ぐて はなり ません。 



PR I NT "3+5= ";3+5|CR| 
3+5= 8 




" "の 中の 計算 式 はス卜 リンクて す。 実際の 計算 
は、 セミコロンの あとに 続< 計算 式に よってな さ 
れ ている わけてす ね。 てす から'' ' 'の 中が 1 00 
+ 1 00 て あろ ラと 0 + 0 てあろう と、 コンビ ュ 

ータは 何の 矛 眉 も 感じません。 ためして みて ぐ だ 
さし、。 

て は 「し の 代りに 「， J を 使つ; S ら どうなる てし よ 
ラかマ 

PR I NT "3 + 5 " . 3 + 5lCRl 
3 + 5 

おやおや！ …… 3 + 5 の 結果 か、 ぐんと 離れて 表 
示され まし だ。 つまりつ ぎの ような ちかい ガ ある 
のて す。 

： -… すぐと なり 合わせに 表示され る。 
， … … 右の ように 1 0 字 分離れ だと ころから 
表示され る。 



PRINT °3t5 = ' 
3 十 5 = 



3 十 5ICR"] 
8 ~ 




二の 一言 ぞ^ フさ" 
に^く 8 の 正負 
め fSg ち果示 
す 所です 



PRINT "3-5=",3-5LM] 
3~5= -2 
K-IO き 似ヌ ~~ ^ 




7i だ IE 記 § の 匕 さ 
は. 教^ _t の 習 滑 
I- し ナ = が 号 
力 \"$|&& さ HTZ_ い 
3<nz" す 



PRlNT l, 3-5-=";3-S|CP] 
3-5- -2 一 



コンマて 区分し だ 場合、 ス卜 |J ンクの 終りから 6 字 分 ひら < の ではな <、 ス 卜 1 」 ンクの 始めから かぞえ 
て 10 字 分 ひらぐ ことに、 ご注意ぐ ださい。 つまり ス卜 1 J ンクの 長さに は 関 < 系な く、 8 という 数字 ガ表 
示される のて す。 



PR I NT " 1 2345 " , 3 + 5[CR| 
12345 8 

< 10 字 分 

PR I NT " 1 23456789 " , 3 + 5[CR| 
1 23456789 8 
' 10 字 分 》 

もし ス卜 リングが 1 0 字 以上の 場合に は、 8 は 自動的に さらに 1 0 字 分離れ てし まいます c 
PR INT" 123456789012", 3 + 5lCRl 



1 234567890 1 2 
* 20 字 分 - 
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いよいよ、 何 行に も わたつ だ 命令文の フロ クラムと 
の 出会いて す。 




1 0 A = 3 

20 B = 5 

30 C=A+B 

40 PR I NT 




とぐ に 説明の 必要がない 程の プロ クラ^て すね。 
C = A + B 

の 計算 式て A = 3、 B = 5 の 場合 を St 篝し、 A、 B、 C を テレビ 画面に 表示しなさい、 という 意味の フ 
口 クラムて す。 

各 文の 先頭に 塞かれた 数字 を 文 番号と いい、 コンビ ュ一 タは必 す 文 番号の 小さい 値から、 大きい 値へ と、 
順序 正しぐ 実行して いきます。 しだ かって、 あとて 上の プロ クラ^に、 だとえば 
35 D=B-C 

などと、 途中に 新しい 命令文 を 追加す る こと も 可能て す。 コンピュータ は、 文 番号の 順に プロ クラ^ を 
実行して いきます。 した かって、 文 番号 は 上の 例の ように 1 0 行 飛びに してお き、 あとて 必要に) i& じて 
命令文の 追加 ガ てきる ようにし てお < のが 18 明な やり方て す。 なお、 文 番号 は 1 から 65, 535 まて 自由に 
選 ふ' ことが てきます。 



文 番号 




CR 

\\Ji 



(^厶 おほえた . 1 了 



文字 を テレビ 画面に 表示した だけて は、 コンビ ユー タに 
入力した ことに はなり ません。 各 命令文 を 表示し 終つ だ 



そのつど CR キー を ぐ ことによって はじめて 




そこて だとえば 
35 |CR| 

とすると、 文 番号 3 5 の 命令文 は コンピュータから 
消えて しまいます。 

さあ、 それて はフロ クラム を 実行 させて みましょう。 




ゥ厶 m% 

ね r= 



RUN CR とだ だいて ぐ ださい。 



RUN 
3 
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•10 字 分- 



- 10 字 分- 



1 



正負の 記 号ガ 入る G めの 1 字 分。 
負 COP のとき に マイナス r — , " 

： ' ； : —一 —一 



<A.B C の谜 が' 2 ケク WJ: 
にな StTlT —^ 号が' 
つく 《直のお 萆 1尝隙 に 

し Z あく ヒ 
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LISTER) 

READY 



： 試行錯誤 を 繰り返しな ガら コンビ ユー タと 
の 対話 を 続けて いると、 いつの 間に やら、 始めに 入力 
した プロ クラ^が 画面から 消えて な < なって し 、る こと 
があり^す ね。 

て も、 心配 はいりません。 コンピュータ は、 プロ クラ 
ムを 決して 忘れて いる わけて はない のて すから.. ちう 
一度 先に 入力した フ 口 クラ^ を 見たい とき は、 



LIST CR 



と キー入力 してぐ ださい。 コンビ ュ一 タ; tfS 己 憶して い 
るフロ クラ 乙 を 全部 テレビ 画面に 表示して <れ ます。 
もし、 何十〜 何百 行に も わ だる フ 口 クラ 乙て、 一度に 
全部 を 表示て きないと き は、 ブロ クラ^の 一部分 を 表 
示させる ことち 可能て す。 



さあ, あ-しえ 7 
あげた" 7°D ゲラ厶 
玄^: き P 食つ Z 

二" らんなさい 



閱 it つ Z いよう 力、'： 
正 しか 3 うか': 教え/ •:， 
匕 あ'!； の こと t 
^郎 言う^ 




し 


ST 


一 30 ICR 




文 番号 3 0 までの プログラ^ を 表示。 


し 


ST 


o 

CO 




文 番号 3 0 以降の プログラム を 表示。 


し 


ST 


30-50 


crJ 


文 番号 3 0 5 0 の プログラム を 表示。 



iCR 



N E W の 結末 は 



新しぐ フロ クラ^ を 入れる とき は、 前の フロ クラム を 
NEW て 消して しまいましょう。 そうて ない と、 2 つ 
の フロ クラ 乙が 重なって、 ゴチ ゃゴチ やにな つてし ま 
うこと ガ あるから てす。 



NEW CR 



によって、 すべて を 消去す る ことが てきる のて す。 念 
のためにし I ST を 出して 確かめて みて <だ さい。 




10 A = 3 

10 B = 5 

30 C =At B 

iW PRINT A,B,C 

SO END 




7 卷引 0 々、ら 30 

まで' 參 ^"2 みよ ラ. 
だ' *1 "どし、 H つ L§ す 
め ほ め うだな あ 




V へゥ) 




1 O A = 3 

20 B=5 

30 C=A+B 

40 PR I NT A, B , C 




エラ-の きえ 明 （くわしく l よ 1 1 1 へ。" ^も わ く^、 ) ） 

SYNTAX ERROR IN 50 
x t 

SYNTAX^! irr \ 文 番^ 50(nS.t* 
だい？ ビ： が': c ラ-、 ^ ^ 



2 4 ページの プロ クラ^と 同じ ものて すね。 うまぐ 走 
つて ぐれました か 7 

もし 途中の 命令文に 誤り ガ あると、 コンピュータ は そ 
のこと を あな だに 教えて ぐれます。 たとえ ぱ 

50 EMD 

こ、 N と M と を まち かえて いると、 文 番号 4 0 まて は 
命令 どおり 実行して ぐれます ガ、 コンピュータに とつ 
て EMD と は 何の こと やら わからす、 

SYNTAX ERROR IN 50 




^令の お X が'^ il)? い 3っ7ご乙 さ. 

续 1% はんか ヒ m じ Zr , [%X i: m か き 

%^%i^^Z く) fU? い ヒ fl^ 
にで^ 1? いんち" 



あな; 5 に SYNTAX ERROR. つまり 文章 構成 
上の エラー を 教えて くれます。 さっそく 

50 END 

と 打ち 直して ぐ ださい。 コンビ ュ一タ は、 同じ 文 番号の 命令文が ふたつ あるとき は、 後から 入力し だ 命 
令 文の 方 を 取り 上け るの てす。 

これて フ 口 クラ 乙 は 完全に なり まし だか？ もしそうなら だめし に、 だとえば 文 番号 2 0 の 命令文 を、 
わざと まち かえて みません か 7 

20 5 = B 

これて 文 番号 2 0 の 命令文 は SJ 正されて いる はす。 て も、 栗して そうて しょうか マ 念の だめに 

L I ST してみ て < ださい。 




1 0 A = 3 

20 B=5 

30 C=A+B 

40 PR I NT A. B， C 

50 END 



20 B=A 十 55 
20 』=A 十お 
20 uuBtrujAJ 十 55 
20 uB = A 十い レ 5^ レ S 



スへ。 一 ス^ 示して 
い よ 




'ゝ おかしな ことにな り まし だ。 文 番号 2 0 ガ 訂正され ていない 
だけて なぐ、 文 番号 2 0 5 という 奇妙な 命令文が あらわれ ま した。 
実は、 コンピュータ は 2 0 と 5 の 間に あつだ ス ベース （空白の 部分） を 
無視して、 ひとつな かりの 文 番号と して 整理し だのて す。 コンピュータ 
にと つて スペース は 全ぐ 無意味な ものと して 無視され るの てす。 



7A 。一人 
があって も 
纖 すされ 糾 



% ォ T さ] IU ヒ さは 
ヒ" }fl も 全く^ じ 
せんだ 
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コンビ ユー タを 使う と、 筆 S や 電卓て はとても やり切れな いよ ラな 面倒な 計算 も 別に 苦に はなり ませ 

ん。 てす から、 普段 思い付いても 面倒 さ tf 先に 立って 試して みだ ことのなかった ょラ な、 しかも 変わ 
つ S テーマに ついて、 計算して みるの も 一興て す。 ^とえば、 もし 「のみ」 ガ 人間 や 象と 同じぐ らい 
の 大きさに なって、 その 跳躍 力 も それに 比例して 大きぐな つ だら どれ 位 飛べる だろう か、 とな、 もし 
人口 か 現在の 比率て いつまても 増え 続けた としたら …… 等/? いろいろあります。 これらの 計 » を; 5 め 
てし 、けば、 あな だはち よ つと し^ もの 知り 博士に なれる にち がし 、あり ません。 
浅 草の 観音き と、 奈 良の 大仏 様 ガデー 卜 をしょう と 思い付き、 同時に 立 上って 相手の 方向に 歩き 出し 

ました。 お 二 75 の 出合いの 場 は どの辺になる てしょう かとい う 問題なん かいか ガ 7 
東京 浅 草 寺の 聖観世 薩は約 5 .5cm の 立像、 棄大 寺の 大仏 様 は) S 害那 仏" ^ 約 16.2m 、 立 上ったら 恐 
5<34m は あるて しょう。 なお、 II 倉の 大仏 様 は 高徳 院清淨 泉 寺に あり、 阿弥陀ね 来の 像て 約 11 .4m. 
立ち上ったら 24m てし よ o か。 まだ、 小さな 浅 草の 覼 g 様の 名 音の ために 申し添え ると、 親 音 様 をお 
守りす る 仁王 様 は 大仏 様に 負けす 劣らす 大男の はす。 何しろ 仁王 様の はきもの は 長さ 4. 5m、 幅 1.5m. 
重さ 400/© の ジャンボ ワラ ジ なのて すから。 

浅 草 一 東大寺の H 線 距離 は 約 380to 、浅 草 一 鎌 倉ガ約 49to てす。 普通の 人ガ 時速 4 to て 歩ぐ とし、 その 
スピード は 背の 高さに 比例す ると 考える と、 さあもう 計 S てき^す ね。 ぜひ 試して みて ぐ ださい。 





她級 


4 ぐれ 


良蜂雜 夸 
乞 あく s ち簡 


： 玄^ <日 あ 




0. 055 • 


0,13^ 


XD 


3^7 9 裯 


疾ぼ姚 


I 34 






ひら 1 


磁 9 丈 仏销 


2 A 


5GS 
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4 1 ラ 





45吼り ゎラ じ' も はぐ ィ ニ 王 #_っ 智長 はも" 30^ く" ヌパ さみ さ r 乙よう 




さて、 コンピュータと 対話しながら 作って いる あな だの フ 口 クラ^に 関して、 

間違い を 修正した いとき 

修正して、 よりよ い 命令文に しだいと き 

修正して、 別の 命令文に したいと き 

すてに 完成して し 、る 命令文から、 ほんの 一部 を 修正して 新しし \ 

命令文 を 作り出し たいとき 



このような ときの 命令文 修正 や 追加 削除の 方法 を、 研究して みまし ょラ。 



カーソルの 移動 



命令文 内の 文字 を 訂正す るた めに は、 その 文字の 
位罾に カーソル を 移動 させな < て はなり ません。 

カーソルの 移動 キー （上下 左右） および、 け \IST 
(揷 入）、 DEL (削除） それに スべ一 スキー は、 ォ 
—卜 リビー 卜 機能が あり、 キー を 押し 続ける と礙 
り 返して 実行し ます。 （SP— 5030) 
て は 文 番号 2 0 の B = 5 の 5 を 7 に 変えて みま し 
よう。 動かす 手順 は 右の 囡を 見て ぐ ださい。 

これて テレビ 画面 上の プロ クラ 乙 は 修正て きまし 
だ。 しかし、 これ だけて はま だ コンビ ユー タカ' 記 
憶して いる フ ログ ラム を 修正して いる わけて は あ 
りません。 記標 内容 を 変更させる だめに は、 必ず 
[CR| キー を; S たいて やる 必要が あります。 
ェ？ … … その 前に 7 と 入れるべき 所 を 6 と 入れ て 
しま つ だのて すか つまり カーソルの すぐ 左 隣の 
文字 を 修正す る わけてす ね。 それに は 二つの 方法 
ガ あります。 





勒し統 けます c ここて ふだ だび [7 1 キー をた たき s す。 
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文字の 追加 



2 6 ページの プロ クラ 乙て、 文 番号 3 0 の 命令文 
をつ ぎの ょラに 変更し S いとき は、 

30 D=100+A+B 

カーソル を A の 上に 移動して ぐ ださい。 そしてつ 
ぎの ような 手順て キー 操作して みて ぐ ださい。 




SH I FT キー を 押しな から 



NST • DEL 



ちょうど 1 0 0+ を 追加て きる 4 字 分の スペース 
を 作ります。 それて は、 この ス ベースの 部分に、 
1 00+ を 入れて ください。 C を D に 修正す る 方 
法 は、 もラ 説明 を 要しません ね。 
せっかぐ ここ まて 修正し だのて すから、 文 番号 を 



3 0 から 3 5 に 修正し だ 上て CR キー をた た 
き、 文 番号 4 0 の 命令文 を 

40 PR I NT A， B， C, D 

に H して RUN させて みたらい かガ てしょう。 

RUN 

3 5 8 

文字の 削除 

35 D=1 00+A+B 
この 命令文 を H してみ ましょう。 だとえば 

35 D=A+B+C 
に 修正した いとき は、 A の 上に カーソル を 移動 さ 



せ、 INST 'DEL キー を 押して < ださい 
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A+B の 部分 ガ= 印の すぐと なり まて 移動し ます c 
+ C の 追加 はもう 説明 を 要 しないと 思います。 



RUN 

3 5 8 1 6 



no A=3 

50 B=5 



5@[D=r100+]A + B 

《0 P に INJT ん B,^[g 
50 END 




も^で 'は き 30 り 
やお 肖 わたけ ど',' 



llST し 7 み J ごつ 



翻で や' ん 
終 まつ Z ら. 

10 A=3 

30 C=A+B 
35" D=100+A+B 
A-0 PR 町 ひん J? 
5-0 END 




^す ferr't しな 
、ホ っ^ チ 5ヒ' や.」 




おさらい のために、 ふ; きたび 2 6 ページの フロク 
ラム を にと り ます。 



1 0 A = 3 

20 B=5 

30 C=A+B 

40 PR I NT A, B, C 



女鋈も 40 の ィ七リ /こ つき'' ク こ/る ど… 
40 PRINTS 

41 PRiMTB 

マ に 



3 



5 



< 10 字 分 

〔数字の一 字 前に 正負の 記号の ための スべ一 ス 

てしたね。 つま り 文 番号 4 0 て A、 B、 C の 間に 
コンマ を 使う と、 1 0 字す つ 離れて 数値 か 表示 さ 
れ ています。 

て は 新しぐ いくつかの 命令文 を 追加した フ 口 クラ 
ムを 作り、 RUN してみ ましょう。 追加す る 命令 
文 はつぎの 4 個て す。 




32 D=BTA 
34 E=B - A 
36 F=BZA 



RUN 



3 

1 25 



5 

1 5 




B A =BfA 



1 . 6666667 



文 番号 4 0、 4 5 の 「， 」 を セミコロン 「にに 修正 
してもう 一度 走らせて みましょう。 修正に は、 一 
度 LI ST しだ あと カーソル をう ま < 使って てき 
る だけ ス マー 卜に ね。 
RUN 
3 5 8 

1 25 1 5 " 1 . 6666667 

「； 」 は、 表示す る 文字 や 記号 を、 びったり とぐ つ 
つけて しまう 性質 かあります。 念のために 文 番号 
4 0 の 命令文の 終りに も'—；」 を 追加して RUN し 
てみ てぐ ださい。 

40 PR I NT A ； B ； C ； 
RUN 



瞬 r び 123， が 函 

1 23 おら 




コロンの 使い方 




れぼ: j a レ だ、. 

( 仗んで （、マ ぞ^つ ぬん 
v 、他 、ど ぜ一. 】 ' 



この プロ クラ 乙 を 見る と、 各行と も 短 かい 命令文 
の 集まりて てきて います。 しかし、 もし ごの 程度 
の 長さの フロ クラムなら、 そしても しあな だが そ 
うし だいと 望まれるなら、 ひとつの 文 番号の 中て 
すべて を 処理す る こと も 可能て す。 




C おれ ほ felj^ i ^ ^ r A 

おしく つつけ るせ' ^ 



1 00A = 3 ： B=5 ： C = A + B ： D=B T A ： E = B ■ A ： F = B/A ： PR I NT 
A; B ； C ： PR I NT D， E, F ： END 
RUN1 00 

コロン 「： 」 は ひとつの 文 番号の 中に、 ふたつ 以上の 命令文 を 入れ込む ときに 使ラ 記号です。 このよう 
な 命令文 を 多重 命令 （マルチ ステ一 卜メン 卜） といい ます。 ひとつの 文 番号の 中には、 2 行に わた 
る 文 を 3 き 込む ことができます。 1 行 は、 4 0 文字です から、 文 番号 を 含め 7 6 字までの 範囲なら、 
自由に 使ラ ことが 可能な わけです。 




あとい <っ" ？ 

コンピュータに フ 口 クラ^ を つぎつぎに 覚え込ま 
せて いると、 あな だガ 自由に 使える 記憶 容最ガ あ 
とどれ ぐらい 残って いるか 知り だぐな る ものて す 
このような とき 

PR I NT SIZE 

として やる と、 コンビ ユー タは、 残りの 記檍容 B 
の 数 （パイ 卜 数） を 教えて ぐれます。 ほぼ、 この 
数 纏に 当たる 文字 数の 命令文 を 記憶す る ことかて 
きる という 意味て す。 



今 まて 何気なく 使って き. だ 「-」 号に 注目し 

てみ ましよ ラ。 ますつ ぎの プロ クラ 乙 を 実行 させ 



10 A=1 

20 PR I NT A , 

30 A=A+2 

40 PR I NT A 

50 END 

RUN 

1 3 



1 と 3 ガ 表示され まし だ。 文 番号 30 を 見て み 
ると、 A = A + 2 とあります。 もし これ ガ 等式 だ 
とし だら、 両 23 から A を ひいて 0 = 2 とな り 矛盾 
します。 そうて はない のて す。 

|gs 「=」 の 意味 は 右辺に ある 計算 式な どの 結 
喿を 左辺に 用意され た A という 名前の 箱へ 代入す 
るの てす。 






艾 番号 1 0 て 1 という 値ガ A という 名前の 箱へ 代入され、 文 番号 3 0 の 右辺て 箱 A の 中の 儘と 2 ガ加 
算され て、 記号 「==」 によって 箱 A に 代入され ます。 その 時 箱 A に はじめ 入って いた 1 という 《 はもう 
箱の 中にはあり^せん。 



つぎの 2 つの プロ クラ^の ち かし 、も、 
しょ ラ。 



記号 「=_■ ガ 代入 命令て ある ことによって はじめて 理解て きる て 



1 0 A = 5 



20 
30 
40 
50 
60 
RUN 

5 

7 



B=7 

PR I NT A, B 
A = B 



PR I NT A. B 

END 

7 

7< 




1 〇 A = 5 

20 B=7 

30 PR I NT A, B 

40 B=A 



50 PR I NT A ，已 

60 END 

RUN 

5 7 

5 5-* 




32 



コンビ ユー 夕の 命令文の 中て 使われる 変数 は、 数 
学 上の < 吏い 方と は、 ちょっと 違つ だ 考え方 をし な 
ぐて はなり ません。 

命令文に 使われる 変数 は、 数値 を 収容す るた めの 
箱ガ あり、 その 箱に 付けられ だ 名称 とても 言 ラベ 
きちの なのて す。 そして 

B=5 

というの は、 B という 箱に 5 という 数值を 入れな 
さい、 という 意味な のて す。 しだ かって、 2 6 ベ 
ージに 示した ような 使い方 は、 たとえ 文 番号と ま 
ちかえた つ しないと してち コンピュータに とって、 
はなはだ 困つ だ 命令文と ぃラ ことにな つてし まい 
ます。 何しろ 5 の 中に B とい o 箱 を 入れなさい、 
というの てす から。 




'ェ— h 今まで' A の 中 , こ八バ 
3と， 8/こ\っ7()るゥ 
ども 力 0 え も 8 を, A の 新しし) 

、^ ：ィ ま/二 13 どレ) うわ ひ さあ 



1 0 A = 3 
20 B=5 
30 A=A+B 
40 PR I NTA 
50 END 
RUN 
8 

数学的な 定義から 見 だら、 この ブロ クラ^に は 明 
ら かに 矛盾 ガ あります ガ、 コンピュータに とって 
はちつ とちお かしい ことて はない のて す。 



30 A-A 十 B 






： なりたがる 文字 



コンピュータの 変 

'•\ 2 文字 以内の 文字の 組み合わせて なぐて はなり ません。 3 文字 以上に わ だる 変数 は、 命令文と して は 憶 さ 

れ ますが、 コンビ ユー タ 処理に あ G つて は、 3 文字 以後の 文字 は 一切 無視され てし まいます。 だとえば ABC、 
ABD は 表示 するとき は 区別され ます ガ、 资算 処 理 のとき は、 同じ 変数 AB とみな されて しまう のて す。 
変数と して 使える 文字 はつぎの 通りて す。 
(DA-Z アルファ ベッド 2 6 とおり 
例： A ， M , Z 

(2) アルファ ベッドに 1 けだの 数字 （0~9) を 付加し だ 文字 260 とおり 
例： AO ， K5 , Z9 

© アルファべ ッ 卜の 2 文字 を 組み合せ だ 文字 ； 2 だし BAS I C ステー 卜メン 卜に ある I F、 ON, T〇 など 
は 使えません。 



星の 王子 様の 地球 親 測… 「地球と いうの は、 太陽系 
の 中に ある あの 育い 惑星 だ。 少し ゅガん ている ガ、 
直 }圣 は 約 1 万 3 千キ ロメ一 ター、 軌道 i ナ算 からす 
ると、 質璗 はだいたい 6 X10 1 7 万卜ン あるよ ラ だ 
ぞ」 

星の 王子 様 は、 さつ そぐ 自分の コンビ ユー タのも 
とに 走り 地球の 体積 VE、 表面積 SE、 それに^ 
S 密度 ZE を 計算して みょうと、 こんな フ 口 クラ 
^を 作って みまし だ。 

10 DE=1 3000 
20 WE=6E+1 7 
30 SE = 4 • k ■ (DE/2) T 2 
40 VE = 4 - n - (DE/2) T 3/3 
50 ZE = WE/VE ' (1 E-2) 
60 PR I NT " チキュ ウノ チョッケ ィ' 
7 0 PR I NT "チキ ユウ. 
80 PRINT" 

90 PR I NT " チキュ ウノ シッリ ヨウ 
1 00 PR I NT" チキュ ウノ S ッ 卜、、 
1 1 0 END 






和 変数 DE に 地球の 薩柽を 代入す るんだ 
争 変数 WE に 地球の 質霤を 代入す るんだ。 
傘 これて 変数 SE に 表面 »ガ 入る ぞ 
争 これ は 変数 VE に 体 損 を 代入す る もの だ 
+ これて 変数 ZE に 密度 ガ 代入て き るんだ 





DE 


"キ □ メードル" 




SE 


' 'ヘイ ホウ キロ メードル'' 




VE 


"リツ ホ° ゥ キロ メードル" 




WE 


"マン 卜ン" 




ZE 


' 'キロ ク、、 ラ乙 ッホ。 ウメ 



星の 王子 様 は、 地球の 大きさ ガ 少し わかつ だ 気がしました。 出て ぐる 単位に 注意して 下さいね。 

ここて、 * とか i とか T など ガ ひとつの 計箄 式の 中に あるとき、 どの 順て 計算して ゆぐ のな 注意して 
おきましょう。 演算の 優先 順序 をつ ぎに 示します。 




次に 示す 式 はちよ つと 複雑な 組み合わせになります かどうて す、 ちかいが わかります か、"^' 



2 + 3 T 2=1 1 
(2 + 3)T 2 = 25 



1 2/3*2=8 
1 2/(3 + 2) = 2 



' 2 * 2 T 3 = 1 6 
(2 + 2) T3 = 64. 00000 1 



1 2/3 T2 = 1 .3333333 
(1 2/3) T 2=1 6 



三角形の 内角の 和 は 1 8 cr 9 アルキメデス はそう ひらめぐ とすぐ、 道端に すわり こんて 三角形 を 描い 
てみ るの てした。 そこへ 謎の 兵隊 ガ 現れて 槍 をつ きつけました。 

兵隊 r アルキメデスよ、 お前の 命 もこれ まて だ、 覚悟せ い. , 」 

ァ •! レキメ デス 「ちょっと 待て、 これ を 計算す るから」 

兵隊 「何 だって 7 角度 A ガ 3 0'、 B が 直角て、 角度 C の 大き 

さ を 出す のか。 6 0° に决 つてら あ、 それに 3CA の 長さが 

わかって いれば、 辺 AB と BC の 長さ も、 この 三角の 面 損 

もす ぐ 出る よ j 
アルキメデス 「馬鹿な」 

兵隊 「BAS I C てフロ クラ^ すれば いいの さ。 CA=1 2 と 
してみ るか」 



1 0 A=30 ： B=90 ： CA=1 2 

20 AB=CA - COS (A - n / ^ 80) 

30 BC=CA ■ S I N (A • 80) 

40 S=AB - BC/2 

50 C=1 80-A-B 

60 PR I NT " AB= " ； AB, " BC= " 

7 0 PR I NT " メ ンセキ S= " ; S 

80 PR I NT " A= " ； A, M B= " ； B, 

90 END 



； BC. "CA 
"C= " ； C 



= M ； CA 




角度 C の 大きさ を 辺 A B と BC の 長さ を 使って 逆 正接 関数 ATN て 出し 

てみ ましょう。 それに は 

50 C = ATN (AB/BC) - 1 80/^ 
とすれば 度の 単位て 出て きます。 同じ 答ガ 得られました か。 



S I N (X) などの 関数の 仲間 をもう 少し 紹介し ましょう。 それぞれ カツ コを 背お つてい ます^ どの 
関数 も、 カツ コ 内に は 定数 や 変数、 まだ は 数式の いすれ ち 入る ことかて きます。 



NT (X) 



X を こえない 最大の 整数 



ABS (X) 



X の 絶対 纏 



SGN (X) 



ス>0ならば1 
X=0 ならば 0 
ス<0ならぱー1 



EXP (X) 



LOG (X) 



LN (X) 



Ce=2.7182818) 

log 10 X 

だ だし X>0 

loge X 
だ だし X>0 



SQR (X) 



C だし XiO 



NT (3.14) =3 
NT (0.55) =0 
NT (-7.9) =-8 



ABS (2.9) =2.9 
ABS (-5.5) =5.5 




SGN (500) =1 
SGN (0) =0 
SGN (-3.3) =-1 



d あ^ん 
, 台ネ 各ね 



EXP (1 ) =2.7182818 
EXP (0) =1 

LOG (3) =0.47712126 



LN (3) =1.0986123 f-^l 




SQR (9) =3 
SQR (0) =0 




PR I NT 2 2 と PRINT 2 T 2 は 同じ？ 

おや 9 …… 2 T 2 て は 4.0000001 とおかし な 端数が ついて きました ね。 これ は 計算 式と し 
て は 確かに 正し ぐても、 計算 がどうしても 有限 桁て 行なわれ る^め、 思わぬ 誤差 かはいり 
こんだ のて す。 

だとえば 2 T 2 は 級数 展開と 呼ばれる 公式 を 使って、 



2 个 2,a|^ + ^lV + ^: 




これて は コンピュータの 悲鳴 ガ閭 こえる ようて す。 コンピュータに 誤差 はっきち の。 それ 
て も、 私たちの 生活に は あまり 気に もなら ない 誤差て はない かな？ 



bas i csas 



ク 

^ 3 



今 まて いろいろな 関数 をみ てき まし だガ、 ここて それらの 関数 を 組み合わせ たもの を、 新しい 関数と 

して 定義す る DEF FN 命令 を 説明し ます。 いぐつ かの 定義の 例 を 並べて み^しょ ラ。 



DEF FNA (X) =2 ■ X T 2 + 3 - X +1 …… 2X'+3X + 1 を FNA (X) と 定義 

します。 

DEF FNB (X) =S I N (X) T 2+COS (X) T 2 …… sin X + cos X を FNB(X) 

と 定義し ます。 FNB(X) は 
いっち 1 になり ますね。 

DEF FNE (V) =1 /2 • M • V T 2 '-… 纟 MV' を FNE (V) と 定義し ます。 

DEF は 「定 親す る」 (define) という 意味て す。 新しい 関数 は FN を 頭に つけて 命名し ます。 カツ 
コの 中の X とか V を 「引数」 と 呼びます。 

たとえば 3 番目の 関数 （運動 エネルギーの ようて すね） を 使ったら、 



10 DEF FNE (V) =1 /2 ■ M ■ V T 2 

20 M=5. 5 ： V = 3. 5 

30 PR I NT FNE (V) , FNE (V • 2) , FNE (V • 3) 

40 END 



とい ラ 具合に 初速 度； tfV のとき の 運動 エネルギー、 速度 ガ 2 倍 3 倍と 大きぐな つ ^ ときの エネルギー 
力 '表示され ます。 特に 長い ブロ クラ^て 何度か 同じ 形の 関数 を 用いる ときに DEF FN 命令の 便利 
さは 無頌 てす。 



高度 は 



,S ，度 1 5 メード j しからの fc 落 Z 
1 75 メードルから 墜落 するとき の 速度と 
1 杪ご とに どんな 変化に なると 思い； 
プロ クラ^ 中の 関数 FN V (T) は 時間 T 経 週し 
^ときの 落下 珠 度の 関数、 FNH (T) は そのと 
きの S 度 を 表わす 関数と いう わけてす。 
重力 加速度 G と 空気抵抗の 係数 K と、 落ち はじめ 
た S 度 H を 文 番号 2 0 て 指定して あります。 




1 0 
20 
30 
40 
50 
60 
70 
80 
90 



？ •' a 

G=9 
DEF 
DEF 
？" ffl" 

？ " シ * カン" 
？" ソク 卜、、 " 
9 " コゥ 卜、、 ' 



： T = 0 

8 ： K = 0. 1 5 ： H=1 0000 
FNV (T) =G/K • ( 1 -EXP (-1 • K • T) ) 
FNH (T) =H — GZK • (T+1 /K ■ EXP (-1 ■ K • T) 一 1 /K) 



T : MUS I C"~A0 " 令 ビッ となる 命令て す。 88^— ジて 説明し ます。 
FNV CT) 
FNH (T) 



T = T+ 1 ： GOTO 5 04 "こ れ は 文 番号 5 0 ヘプ ロワ ラ乙を 移 3 命令て、 41 ベ一 ジて 説明し a す。 



のように、 はじめに 数値 を きめてし まう 方法 をと 
つてい ました。 

コンピュータに 変数の 値 を 知らせる のに、 いぐつ 

かの 方法が あります。 I N PUT という 命令 を 使 
うの も、 その ひとつ。 




え I ぶ 
■ t 1 



90 固 SEej 



コンビ ユ^が 閉ぃ 

7 くる 救 (l«wi 整 
は.' ぼ す "变 おの 

並ん い^ 1| 序た' よ 



1 0 I NPUT A, B ， C 
20 D=A+B+C 
30 PR I NT A, B, C, D 
40 END 
RUN 

<? m<^=^) 

見なれ ない 表示 ガ出 てきました ね。 
7 騸は、 コンビ ュ一 タガ あなたに 対し、 I NPU 
T 命令に 続ぐ 一番 目の 変数 A の 数備を 問い合わせ 
てきて いるの てす。 あなた はこの 問い かけに 答え 
て 数僵を 入れ、 これて よいと |CR| をた たいて ぐ 
ださい。 

ァ レレ、 また 同じ 表示が 出ました ね。 これ は 2 番目の 変数 B の 値て す。 もし 変数が 3^1 て あれば、 コン 
ビュー タは 3 回き いてきます。 ちし 途中て まち かえて、 0~9 以外の キーて 答えて を だた くと 

DATA ERROR 




答え や まちがえたら 
顧 る キ-^ せぱ 

いいさ 。答が' 0K 
なら ご fU でい ヒ 



と 表示し、 まだ 最初から 数 纏の 問い合わせ を はじめます。 



1 0 I NPUT A, B, C, D 

20 I NPUT E, F , G, H 

30 PR I NT H, G, F, E 

40 PR I NT D, C, B, A 

50 END 



1 0 
20 
30 
40 
50 
60 




I NPUT "八=マ 
I NPUT " B=9 
I NPUT "C=9 

S=A+B+C 

M=S/3 

PR I 
； M 

END 



A 
B 
C 




セ 5 コロン j 

7\ "； S, "ヘイキン ノぃ' 




ある 晴れ だ曰曜 曰、 シャ レだ憨 じの 喫茶店て 向かい あってる 彼氏と 彼女。 彼氏の ほう は 43 歳て スポーツ 
7 ン タイフ だ ガー 見 ブレイ ポ ぐふうて す。 まだ 彼女 は 美しい 22 歳のお 嬢さん て、 なかなか II こそ ラに 
見えます。 

彼氏 「君に は一 目 ほれなん だ、 どうだい、 結婚して くれない か」 

彼女 「ええ、 そんなに まて おっしゃるなら 年の 差なん て 気にしな いわ。 て も、 いますぐ はい や。 わたし 
の年ガ あなたの 年の 半分になる まて 待って てね」 

彼氏の 年 を A、 彼女の 年 を B、 そして 彼女が 何年 か 待って というから X 年 待つ ことにします。 X 年後に 
は、 彼氏 は A + X 歳に なり、 彼女 は B + X 歳に な り ます。 彼女の 年 は そのと き 彼氏の 年の 半分になる ベ 
き だから、 A + X = 2 (B + X) という 条件が 必要て す。 これ を X について 解く と 

X=A-2B 
となり ますね。 



1 0 
20 
30 
40 
50 
60 
70 
RUN 
力 レシ 



PR I NT 
I NPUT 

PR I NT 
I NPUT 

X = A-2 

PR I NT 

END 



力 レシ ノ 卜シ 八'' 
A 

カノ シ、、 ョ ノ 卜シ/ \" 

B 

B 

ァ卜 



" ； X ； " ネン マツ テ 



卜シ 八 



9 43 |CR| 

カノ ジ、、 ョ _ ノ 卜シ 八 

？ 22 [CRl 

ァ卜ー 1 ネン マツ テ！ 




ああ、 一 1 年 待つ なんて 不可能て すね。 つまり 1 年 前なら 結婚て き だはす てす ガ …… 。 さて、 コンビ ュ 
一夕に いきなり、 マと 質問され ると 八テ 何の 変数 だつ だかな 7 と 困って しまう ことがあ り ますね。 そこ 
てこの プロ クラ^て は、 文 番号 1 0 と 3 0 に 問い合わせの 内容 を 示す ス卜 リンク を 入れて み^した。 そ 
して 文 番号 6 0 て は 答えの ス 卜 1 」 ンク も。 

この プロ クラ 乙の I NPUT の 方法に ついては もラ すこし 簡単に てきます。 文 番号 1 0 と 30 をつ ぎの 

ように 直し、 文 番号 2 0 と 4 〇 の プロ クラ 乙 は 削除して みて < ださい。 

10 INPU 丁'' 力 レシ ノ 卜シハ ？ 
30 INPUT" カノ シ、、 ョ ノ 卜シハ 



文 番号 5 0 以下 は 上の フロ クラ^と 同じて す。 
RUN 

力 レシ ノ卜シ 八 マ 4 3 \CR] 
カノ シ、、 ョ ノ 卜シ 1\ マ 22 |CR[ 
ァ卜ー 1 ネン マツ テ！ 




変数 を 知らせる、 も o —つの 方法て す。 



1 0 


READ A, B， C， 


D 


20 


X=A+B+C+D 




30 


PR I NT X 




40 


DATA 3. 5, 7， 


9 


RUN 

















この 命令文 は、 あとに 示す 内容の 中から 数 值をひ 
ろし 、出して 計算 を 進める 方法て す。 

これに は、 READ、 DATA の 二種 類の 命令文 
ガ使 われます。 




READ A. B. C, D 

DATA 10. 11. 12， 13 



'いぐつ かの 変数 を 並べる 

•RE AD の あとに 続 < 変数と 同じ 個数の 数値 



NPUT 文の 場合と 同様に、 変数の 並び 方と 数値の 並び 方 は 一致して いなぐて はなり^ せん c 
READ A， 巳， C D 



DATA 35, 6, — 8， 7 + 5 



PATA 们ラし 3 はは 教 f«| 

の ほか, -救 j^t^ 讣 
、加う 4tf 萆 i\ も^えさ めさ. 




READ. DAT A 命令 を 使って 長方形、 円の 面樓、 

につぐ れ^す。 



三角形の 面檟を 求める ブ 口 クラ ^はいかいと 簡単 



1 0 
20 
30 
40 
50 
60 
フ〇 
80 
90 




READ A， B 
S1 =A • B 
PRINT" チョウ ホウ ケィ = " ;S1 
READ C 
S2 = 冗 • C T 2 
PR I NT "ェン = " ； S2 
READ D， E 
S3=D ' EZ2 

PR I NT "サン 力 ヮケィ = " ； S3 






1 00 DATA 2. 4， 6,8.10 



この フロ クラ 乙に ついては、 まだまだ いろいろな 工夫の 余地が ありそうて すね。 あなた も いろいろと 試 
してみ てくだ さい。 
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今 まてに 出て き だブロ クラムて は、 コンピュータ 
は、 文 番号の 小さい 方から 大きい 方へ と 順 序 正し 
< 忠実に 実行して いきました。 
しかし、 ときに より 順序 を 変えて 実行 させ だいと 

きが 出て きます。 こんなと きに GOTO 命令 は 強 
力な 働き をして ぐれます。 



N 



10 N =1 
20 PR I NT 
30 N=N+1 
40 GOTO 
50 END 
RUN 

1 

2 



TO 2 0 

Li 




3 



GOTO は、 その あとに 続ぐ 数 ffi の 文 番号の 命令文の 所に 
無条件に 進めと いう 意味て す。 



止まらない 7- 



IS H I F TI キー を 押して、 IBR E A K| キー をた だいて やれば 止まる はすて す。 



そこて 問題 を ひとつ。 

曾 呂利新 左 衛門ガ 大変な 手柄 をた て だとき、 太 闔秀吉 は軎ん て、 

秀吉 「あつ ばれな はだら きに つき、 ほラび をつ かわす ぞ。 望み をい つてみ よ」 

新 左 「かたじけな いお 言葉、 恐れい ります る。 ささいながら 今 曰 は 1 文、 明 曰に は 2 文、 明 後 曰に 
は 4 文と S 曰 倍の ごほうび を 3 0 曰圊 だけ 頃き とうご ざいます 」 
なんとち つ ほけ な 望み だ わい、 と 軽ぐ 許した 秀吉 はいった いどれ 位の 金 を ほうびに ぐれたら いいのて 



ホウ ヒ、、 コ、、 ゥケ ィ'' 



しょうか。 








1 U 


D=1 ： F=1 ： 


S=1 




20 


PR I NT " 二、 二 


'スゥ " 


， "ソ ノ曰ノ ホウ ヒ、、 " 


30 


PR I NT D; 


"日" 


, F , S 


40 


D=D+ 1 


…つ 曰 


ごとに 1 だけ 増やす ため 


50 


F=2+ F 




ほうび を 倍々 にす るた め 


60 


S=S+F 




ままての 合計 を 出す だめ 


70 


GOTO 30 く 


Km 


I 


RUN 









二 ッスゥ 
1 曰 

2 曰 
1 0 曰 
20 曰 



ソ ノ曰ノ ホウ ビ< 
1 
2 

51 2 

524288 



ホウ ヒ' 
1 
3 



コ、、 ゥケィ 



1 023 




1 04 85 75 I 72 — 73^ —ジを 見て <だ さし、。 

30 曰 • 5368709 1 E + 09 . 1 07374 1 8E + 1 0 

1 00 文; 0'1 岡な のて 1 0 曰 目て 1 023 文、 20 曰 目て 1 0485 両 75 文、 30 曰 目に はお どろ 
くべ し、 およそ 1 0 0 0 万 岡の ほうび を 要求して い; 5 わけになる のて す！ 
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ます^す、 コンビ ユー タを コンビ ユー タ らしぐ 使 
ラ 命令の 登場て す。 

1 〇 I F aaatHENDDD 

もし AAA の 条件 ガ満 だされる のて あれ ぱ、 

□ の 仕事 を 実行す る こと。 もし 満 だされなければ、 

□ □□ は 無視して、 つぎの 文 番号の 國 画 國に迤 め、 

というの ガ I F~THEN 〜の 命令て す。 
□□□ ガ 数値の 場合に は、 その 数 纏の 文 番号に ジ 
ゃンフ する ことになります。 



1 0 


READ 


A 


20 


I F A> 


=0 THEN PR I NT 


30 


GOTO 


1 0 


40 


DATA 


-1 0， 20, 5, 一 9, 8 


50 


END 




RUN 






A = 


20 




A = 






A = 


8 




A = 


5 





I F ...... THEN ...... の 命令文の 一般 形 は 

IF 条件 THEN 命令文 または 文 番号 

という 形 をと ります。 そして、 ここて いう 条件と は、 等号 や 不等号て あらわされ だ 大小 比較の 式 をい 
います。 





...... の 条件 ガ真 （YES) なら、 

され、 偽 （NO) なら 次の 文 番号へ 進み ま 
ど は ほかの 仲間 だち も 紹介して みまし ょラ 



1 F 


THEN 




THEN 




THEN 


1 F 


THEN 




THEN 




THEN 




丁 HEN 


1 F 


丁 HEN 




THEN 



GOTO ' - ■ \ F ...... GOTO 

PR I NT*' ：； I F …―. THEN ？ 
A = 5 * 7 のよう な 代入 文 
I NPUT 
READ 
GOSUB 
RETURN 
STOP 
END 



1 0 PR I NT "H " 

20 PR I NT "1 カラ 9 マテ、、 ノ ニン ィ ノ カス 
チュウ シ スル 卜キハ 0 ヲ ィレテ クタ、、 サイ" 
30 し =0: M=0: N = 0 
40 I NPUT A 
50 I F A=〇 THEN 90 
60 IF A<=3 THEN L=L+1 
7 0 IF A<=6 THEN M=M+1 
80 N = N+ 1 : GOTO 40 
90 PR I NT" アナ タ l\ 1 カラ 3 マラ 
1 00 PR I NT" ソシテ 4 カラ 6 マテ、、 
110 PR I NT" 7 カラ 9 マテ、、 ヲ " 
1 20 END 



ヲ ィレテ クタ、、 サイ C 



GOTO 40 
GOTO 40 



ノ カス、、 ラ 
ヲ " ； M ； " カイ" 
N ： "カイ ィ レマシ タネ " 



； し； "カイ 




HEN の あとに は、 いろいろな 命令文 をつ ける ことかて き 
るの て、 工夫 次第て ちょっとし た 楽しい ケー^の プロ クラ 乙 を 作る こと も 可能て す。 
文 番号 1 0 に は、 また 新しい 記号 B ガ 使われて います。 
クォーテーションマーク" "の 中て 

ISH I F T! キ 一を 押しな ガら [7 卜' ぶ | キー を たた くと、 
0 を 表示す る ことかて きます。 これ は テレビ 画面 上の 文 
字 をす ベて 消してから、 カーソル を 画面の 左上 隅に 移す 

機能 を 待って おります。 

ま S クオ一 テ一シ ヨン マーク " " の 中 て^だ 犖に [^ょぶ 
キー を だた ぐと ffl の 記号 ガ 出ます。 これ は 力- 
を 左上 隅に 移す た めの ものて す。 
ちし はっき り しないなら、 PR I NT とか、 PR 
I NT "ffl" て 確かめて みると わかり ますよ。 




、つ 

ぎつ ちに' 滞る ゥ.」 

、や 
乘'^ 

まっ^: "おちに！/ 夢 j. 




ゾ s x 

■0 c c 

O る マ 人り ヌ 



□ ひ z に 



\ 



出て こい ！ 偶数 



I F ...... GOTO を 使って、 たくさんの 数の 中から 偶数 だけ を 選び だす プロ クラ^ を 考えて みまし 

した。 I F ...... の 数 を 見分ける 力 はこ ころに < いものて す。 



10 READ X ： I F X = — 9999 THEN STOP 

20 IF X/2<> I NT CX/2) GOTO 10 

30 PR I NT X ; : GOTO 1 0 

40 DATA 2,1 3, 56, 55, 4, 78, 31 

50 DATA 6， 22, 15, 19, 80， 1 1 , 一 9999 

RUN 

2 56 4 78 6 22 80 



文 番号 2 0 にある I NT (X/2) は X + 2 の 整数 部分の み を 取り だす 命令て したね。 した かって、 

もし X ガ 偶数なら X ノ 2<> I NT (X/2) は 成立せ す、 文 番号 30 に 進む わけてす。 また 成立し 

S ら、 それ は 奇数 だと 判断して、 次の 数 纏 を 読みと りに ゆぐ のて g。 

て は 腕 だめし に)^ 用 を 考えて みましょう。 

3 の {ft 数と か 4 の 倍数と か はどうす れ ば 判断て きる のかな マ 

もラ おわかりて すね。 答 はこうて 3。 



3 の 倍数の だめの 変 S …… 

20 IF X/3<> I NT (X/3) GOTO 1 0 
4 の 倍数の ための 変更 …… 

20 IF X/4<> I NT (X/4) GOTO 10 



出て こい ！ 



t 大 値と 最小値 • 



10 8=99 9 ： L. = -9 9 9 

20 READ X ： I F X= - 9999 THEN 80 
30 IF X>L THEN L=X 
4 0 IF X<S THEN S = X 
50 GOTO 20 

60 DATA 2， 一 5, 91, 256, 一 43 
7 0 DATA 87, 32 1, 一 76， -9999 
80 PR I NT." サ イタ、、 イチ =" ; L 
90 PR I NT " サイ ショウ チ =" ； S 
1 00 END 
RUN 

サイ 9、、 イチ = 321 
サイ ショウ チ =ー76 




文 番号 1 0 ガ 大事な 考え方て す。 最小 纏 を 入れる ための 変数 S に はてき る だけ 大きな 数 を はじめに 
入れて おくのてす。 そして^ 大 優の ための 変数 L に はてき る だけ 小さな 数 を ！ ところが 実行 結果 は 
どうて しょう。 変数し と S は、 ほんとうの 最大 纏と 嚴小 値に 化けて 出て ぐるん てす よ。 これ は I F 
...... THEN のうまし M 吏い 方と いえます。 



最大公約数と はふ； 5 つの 整数の 合言葉です。 たとえば ふたつの 数ガ 10 と 20 とすれば、 どちらも 割り切 
る ことが てきる の は 1 ,2.5. 10 の 4 個の 数て すね。 この ラ ちて 最大の 数、 つまり 10 ガ 10 と 20 の最 
大公 約数と 呼ばれる のて す。 
て は、 さつ そ < プロ クラ ^を 作り あけましょう。 




10 PR I NT " X ", " Y "アイコ 卜 八、、" 
20 READ X, Y 
30 PR I NT X, 
40 Q= I NT 
50 R=X— Q-Y 
60 X=Y: Y=R 
7 0 I F R>0 THEN 40 
80 PR I NT X ： GOTO 20 
90 DATA 63， 99， 1221, 1 21 
1 00 DATA 123456789, 987654321 
1 1 0 END 
RUN 



プロ クラ^の タネ あかし！ 

実はす つと 音、 ギ 1 J シ やの ユー ク' 少ソ ド とい ラ人ガ 考えついだ 解き方て す 




F ... 

1 ◎ 

20 



F SQI 



CX) ==1 THE 
GO =◎ THEN 



9 " マイナス 
" ife* O " 



FOR ...... NEXT 命令 は、 一定の ルールの もとて 鑤り 返し 処理 を 進める ときに 使う 命令て、 コンビ 

ユー タを 自由に 扱ラ だめの もっとち 重要な 命令の ひとって す。 
簡単な フ 口 クラムから 見て みましょう。 

10 FOR N=1 TO 5 
20 PR I NT N ； 
30 NEXT N 
4 0 END 
RUN 

1 2 3 4 5 

この 命令の 実行され るよう す を 絵解きして 追い か 
け; 2囡 をつ ぎに 示します。 




N の 変化 を 1、 2、 3 と 1 ずつ 大きく する のて はな <、 たとえば 0.5 ずつ 大きく するとな、 あるいは、 
2 すつ 小さ < する こと もてき ます。 このと きの 変化 幅 を STEP という 語て 指定し ます。 



0.5 すつ 大きぐ する に は 

10 FOR N=1 TO 5 STEP 0. 5 
2 すつ 小さく する に は、 ^とえば 

10 FOR N=5 TO 1 STEP -2 
とすれば いいのて す。 
FOR ...... NEXT 命令の 一般の 形 をつ ぎに 示します。 



じサ 

一に 

t ェ 

3 だ- 

は/ P 

き-つ 

一力 

> ち、 



一 JN ど/ 

^ぶー 

5 害た 

あせん 




FOR 変数 = 初期値 T O 最終 値 STEP 変化 幅 

'繰り返される プログラム 



初期 纏、 最終 値、 変化 
幅 は 変数て ち、 定数、 
数式て ちガ まいません。 



エリス はい ま 宿題 を やって います。 九九の 表 を 
作る のて すガ、 コンビ ユー タて やって しまお o と、 

FOR …… NEXT を 二重に 使って みました。 




変数 X の FOR …… NEXT ルーフの 中に、 変数 Y の FOR …一 NEX"H し一 ブか はさまれて います。 
変数 X と Y は それぞれ 1 から 9 まて 変化し ます ガ、 最初に 変数 X に は 1 力' 代入され て、 変数 Y の ルー 
フを 実行し ます。 つまり 変数 X ガ 1 のま ま 変数 丫ガ 1 . 2. 3 …… と 9 になる まて 変化して いき、 そ 
のつ ど 文 番号 3 0 て 変数 X との 掛け算の 結喿ガ 表示され ていぐ のて す。 変数 Y が 9 まてい ぐと 文 番号 
5 0 て 行 替え をして 文 番号 6 0 て 今度 は 変数 X ガ 2 となる のて す。 



FOR …… NEXT ルーフ は 2 重 3S と 重 ねて 使う ことが てきます。 しかし 必す 守らなければ ならな 
いこと は、 ルーフ 同^ を 交差 させない という こと、 そして GOTO などに よって 外から ルーフ 内に 飛 
び 込まない、 とい ラ ことて す。 



III 
i 

5 



i し 



i い 7 。クタお ラ、 |7 リ リ込 も- 

-FOR 約 t ^な は^ゅよ 
-FOR B=l TO 5 
foR. d TO 7 



-NEXT C 
NEXT B 

-NEXT A 




NEYT なか どつ i= まビ 
めさ 二 ども 了" きさよ. t: おひ 
A/£XTA,B, こ で ゆ畫カ i,\t^i} 



このように ルーフ C は 完全に ルーフ B 内に あり、 ループ B は 完全に ルーフ A 内に 含まれる ようにし ま 
す。 右の ように NEXT を一 語 だけ 使うても あります。 



エリスが コンピュータ 
て 勉強して いだら、 こ 
んなー 適の 手紙な 届き 
ました。 

いつ だ いどん な 手紙な 
のて しょう。 



KISS ME ！ 1 ' 

10 ？" BEL I CE ！ EL I CE ！ " 
20 I NPUT ' '卜'' 、レタ "ケス キ7 " ； L 
30 I N PUT " 卜、、 レ 夕'、 ケア イタ ィ 1 ? " ： V 
40 FOR 1 =1 TO し 
50 ？ " I LOVE YOU" 
>R J=1 TO V 



70 "? "CHU ！ " ； 

80 NEXT J ： ? ： ? 

90 NEXT 1 

1 00 ？" YOUR SINCER 

ELY PRINCE " 
1 1 0 END 



1 0 FOR X=1 TO 9 

20 FOR 丫 =1 TO 9 

30 PR I NT X • Y ; 

40 NEXT Y 

50 PR I NT 

60 NEXT X 




任意に 選んだ 4 個の 数字 を 入れて やる と、 コンビ ユー タ は、 その 数字 を 大きい 順に 並べ 替えて < れる 
プロ クラムて す。 I NPUT 命令 を 使って みましょう。 



1 n 
i リ 


p R | M T "181 " 
r r 、 1 INJ 1 iS 










ど U 


O D 1 M T " A ~ I ノ 力 つ々 

r^M 1 l\J 1 h _l ノ 丁 J 人 


づ 


オシ ェテ 


ノ" y、 


30 


1 NPUT A, B， C， D 










40 


1 F A<=B THEN K 


=A 


A 


=B ： 


B = K 


50 


1 F 巳 <=C THEN K 


=B 


B 


=C : 


C = K 


60 


1 F C<=D THEN K 


=C 


C 


=D ： 


D=K 


70 


1 F A<B GOTO 4 〇 










80 


1 F B<C GOTO 40 










90 


1 F A<C GOTO 40 










1 00 


PR 1 NT A, B, C， D 










1 1 〇 


PR 1 NT ： PR 1 NT "モ 


ウイう 




、 卜 


、、 ゥ ソ、、 


1 20 


GOTO 30 











NT 



PR I NT 



文 番号 4 0 の 命令文に 注意して ぐ ださい。 THEN 命令 以後て、 別の 変数 K の 箱 を 使って、 A と B と 
の 数 « を 入れ替えて しまう 仕事 を やって います。 もし はじめに A = 3、 B = 5 だつ だとし だら、 




この 仕事に より、 A = 5、 B = 3 になって しまい まし だね。 同様な 処理 を 文 番号 50、 6 0 て も 実行 
しています。 文 番号 7 0~ 90 は、 この 入れ替え 作業 を 何回ち 繰つ 返させる ために 用意した 命令文て 
す。 
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三 平 万の 定理 A 2 =B 2 + C 2 を 満足す る 1 から 2 0 まての 正の 整数 を さかし 出す フロ クラ^ を 作つ 
てみ ましょう。 



1 0 PR 
20 PR 
30 PR 
40 PR 
50 PR 
60 PR 
7 0 PR 
80 PR 
90 PR 
1 1 0 
1 20 
1 30 
1 40 
1 50 



NT 

NT 
NT 
NT 
NT 
NT ' 
NT ' 
NT ' 
NT 




の キー さ 侍って 
丁し ヒ^ ® 上 （：. きれい 
"三角形 を 作つ？ みで^」 
イ^ © した あとの クオ— テ一 

シ ヨン 7 — ク； 5、此 ちゃ 
いやよ-。 



PR I NT " サン ペイ ホウ ノ ティ U ヲ S タス セィ ノ セ イス ゥ" 
PR I NT ： PR I NT "BA " , "B3B" , "EC" 
FOR A=1 TO 20 
FOR B=1 TO 20 
FOR C=1 TO 20 

I F A • A — B ■ B — C • C=0 THEN PR I NT A, B, C 
1 60 NEXT C， B, A 
1 80 END 



文 番号 1 0 の 意味 は、 ちう ご 存知て すね、 文 番号 20~80 の 閻て、 きれいな 三角形 ガ 完成す るよ ラ 
に、 うまぐ 作囡 してみ てぐ ださい。 

艾 番号 120~160 て、 FOR~NEXT の ルー ブガ 三證 になって います。 A=1、 B=1 のとき 
C を 1 から 20 まて、 つぎに A=1 、 B = 2 のとき C を 1 から 20 まて …… のように、 合計 20x20 
x20 = 8〇00 回 も、 文 番号 1 5 0 に 示す 8t 算式を 繰り返す わけてす。 したがって、 この 演算 処理 
ガ ひととお り 完成す るに は、 ななり の 時間 力' かかる はすて す。 



PR I NT 文て、 データ を 表示させる 場合の カー 
ソル 操作な ど を行ラ 3 つの 命令 を 説明し ます。 



CURSOR コマンド は、 テレビ 画面の 任意の 位 
冒へ カーソル を 移動させる ものて、 テレビ 画面 上 
を、 X 軸 （水^) 方向に、 左から 右ぺ 0〜3 9、 
Y 軸 （垂直） 方向に、 上から 下ぺ 0〜2 4 に それ 
ぞれ 番号つ け をして おり、 その 纏 を数鍾 または 変 
数て 指定し * す。 

CURSOR X , Y 

表の 中の 要素と して、 ある データ を その 位置に 表示させる ょラな 場合、 PR I NT 文の 前に この CU 
R S〇 R コ マン ド を 置いて 表示 位置 を 定めて おぐ とよい わけてす。 

TAB( ) および、 SPC( ) は、 いすれ も PR I NT 文の 中て 使用す る ものて、 TAB( ) は、 力 
一 ソル を、 現在 ある ラインの 左端から 数えて、 どれ だけの タフ レー シ ヨン をと るか を 指示す る ものて 
す。 たとえば、 

PR I NT TAB (8) ； "ABC" 

という コマンド を 与える と、 ス卜 リンク " ABC " 
は、 左端から 数えて （ ） の 中の 数、 つま り 8 文字 
分 置いだ 後の 9 文字 目から 表示され る ことにな り 
ます。 

TABC ) の、 （ ） の 中には、 0 力、 ら 7 8 まての 
タフ レ一シ ヨン ガ 指定て き^す。 まだ、 その 值を 
CUROR コマンドと 同様に、 変数て 指定す る こ 
ともて きます。 

F〇R〜NE XT 命令と 組み合わせて 簡単な フ 口 クラ 乙 を 走らせて みましょう。 

10 FOR X=1 TO 20 10 FOR 丫 =1 TO 20 

20 PR I NT TAB(X);" 氺'' 20 PR I NT TAB (20-Y) ； " * " 

30 NEXT X 30 NEXT Y 

SPC( ) は、 （ ） 内て 示し だ 数の ス ベース を 意味し ます。 つまり、 SPC (8) = ' '—ス ベ ス 8 コ 
―" の 関 < 系ガぁ り ます。 （ ） 内の 値 は、 0 なら 2 5 5 まての 数値 あるいは、 その 間の 値 をと る 変数 
てな ぐて はなり ません。 

TABC ) と SPC( ) を 使った 次の 例て、 雨 者の ちかい を 調べて みて 下さい。 



1 0 


PR I NT 


"H" ； 






20 


FOR X = 


1 TO 20 


： PR I NT 


TAB (8) 


30 


FOR Y = 


1 TO 20 


： PR I NT 


' '氺" ； 


40 


NEXT Y 


： PR I NT 


： NEXT X 




50 


PR I NT 


"ffl" ： FOR 


Z=1 TO 


1 8 


60 


PR I NT 


TAB (9) ； 


SPC (z) 




70 


NEXT Z 











き 



お X 



自動車 レースに 挑戦 



= & つと シンプルな 自動車 レースの プロ クラ 乙 はいか かてす か 7 



10 X = 33 - RND ( 1 ) < ~~ □ S し 数 を 作つ 出 ^ 命令て す 
20 FOR A=1 TO 5 (74 ベ一 ジ） 

30 READ M$ 

40 PR I NT TAB (〇）；"♦"; TAB (X) ; M$ ; 
50 PR I NT TAB (37) ； "♦" 
60 NEXT A 
7 0 Y=1 0 • RND ( 1 ) 
80 FOR A=1 TO Y 
90 PR I NT TAB CO) 

1 00 PR I NT TAB (37) ；" ♦" ： NEXT 
110 RESTORE ： GOTO 1 0 - 
1 20 DATA" JW， 
1 30 DATA " SSfifflf , "*S?SfS?*'' 
1 40 DATA" H 



文 番号 4 0 の TAB (X) て 道路の 左側から どれ だけのと ころに 自動車 を 表示す るか を 決めて います。 
エツ、 車間距離 は 7 …… それ は 文 番号 70 て 0 - 9 まての 乱数 を 作り出し、 文 番号 80 から 100 て 
衝突し ないように している はす。 

ところて、 文 番号 1 1 0 の RESTORE は 見なれ ない 命令て すね。 

RESTORE は DAT A の 先頭に 戻す もの 



なぜ タメ かって 9 変数 D に 読み こむべき DAT A の 数 備^ない からてす ね。 
そこて こ ラ したら どうて しょ ラか / 




1 0 READ 



»A， B' 



20 READ 

30 DATA ^-2 7； 

35 RESTORE 

40 READ 

50 END 



1 0, 9 



RESTORE 命令 は、 プログラ^の 最初の DAT A 命令の、 
最初の データから 読み こめる ょラ にして ぐれます。 



□ A T A 命令 はプ □ クラ 乙の どこ 

ま; n ていきます。 

OK 

1 0 DATA 「2 7 

20 READ し A, B, C 

30 DATA 1 0 ゴ J 

40 …… j 1 

50 DATA 9, 1 3 
60 READ D« ~^ ^ 
7 0 END 



にあっても、 ^たどんな に 散在して いても、 RE AD 命令に 読み こ 



タメ 

1 0 READ r*A, B*^ 
20 READ C« —— 
30 DATA し 2 7， 1 0, 
40 READ D 
50 END 



文 番号 牛" D、 
ぼ ヒ' o し Z 
く ん/ ！ 



19 



コンビ ユー タガ 人間に わかる 言葉 を 作り出して、 
語り かけて ぐれたら …… 。 そんな 望み を 満たして 
ぐれる だめに も、 ぜひ 必要な 機能 ガス 卜 1 J ンク変 
数て す。 



1 0 A$ = 

20 C$ = 

30 E$ = 

40 G$ = 

50 I $ = 

60 K$ = 



アナ タ" ： B$= "ヮ タシ 
l\ " .： D$=" 
二 " ： F$=" 力、、 
テ、、 ス" 
キ ライ" ： J$=" スキ" 
ァ ケ、、 ル" ： L$= "ホン 



普通の 変数 記号の あとに、 $ (ドル K 号） をつ け 
たもの をス卜 リンク 変数と いい、 普通の 変数の 場 
合に 大変よ く 似た 処理； 不可能になります。 以下い 
ぐつ かの 例 を 見なから、 その 性質 を 調べて みまし 
ょラ。 

7 0 PRINT BS 
80 PR I NT AS 
RUN 

ヮタシ 
アナ タ 

「； 」 を 使って い < つかの ス 卜 1 」 ンク 変数 をつ なげて みま 



"、 © 



fe^U:$ のつ い ナ:^ 
リに スト リンク" ズ V '入つ"^ 

ヌ /J た";^ 
しズト リンク" さ、 



ん どつ 中に^ ^ 
"255 え^お" \れ る 
こど 《'マ * き S ゥち 



しょ ラ C 



1 00 PRINT BS ； CS ； AS ； E$ ； L$ ； D$ ； K$ 
RUN 

ヮタシ 八 アナ タ 二 ホン ラ ァケ、 、ル 



もし 「しの 代りに 「，」 を 使ったら どうなる てしょう か 9 



1 20 PR I NT B$, A$, I $ 
RUN 

フタ シ アナ タ 

I- 1 0 字 »h 1 0 字 一 



キ ライ 



'謎つ 铋^ 

け艮 いど, どつ ズも ti ズく 
のね. 



まだいく つかの ス卜 リン ヮを 合成して 新しい ス卜 リンクに する に は、 ス卜 1 J ンク 変数 どうしの 足し算 
「十」 を 利用 すれば てきます。 ひとっ^め してみ ましょう。 



1 40 X$=BS+C$+A$+D$+J$+G$ 

1 50 Y$=A$+C$+B$+F$+ I $+G$ 

1 60 PR I NT XS 

1 70 PR I NT Y$ 

として、 新しい 変数 を 作り出して やる ことち 可能て す。 



/QX$ 、（9 丫^^ スト リンゲ' 5$》 

し "\r ~" の 民し 算も 耵^ 
'愈 き、 なの r:': 



ス卜 リンク 変数と I N PUT 命令と を 組み合わせた 
プロ クラムて 俳句 を 作って みません か マ 

1 〇 I NPU 丁 A$， B$,， C$ 

20 PR I NT A$ ； " ； B$ ； " ； C$ 

30 GOTO 1 0 [ ] に 

RUN 




^ ？カヮ ス、、 卜 ヒ、、 コ^ 
95 ス、、 ノォ卜 

フル ィケゃ カヮ ス、、 卜 ヒ、、 コ^ 



； ス、、 ノス 卜 



I N PUT 記号 を 使って ス卜 リング を 入力す る ときには、 つ 
ォ一 テーシ ヨン マ一 ク'' ' 'は必 要ありません。 

コンビ ユー タ を 使って 俳句 を ひとひねり。 つぎの ような プロ 
クラ 乙 はいか かてしょう。 




1 0 I NPUT AA$ 

20 PR I NT AAS ； " ソ レニッケ テモ カネ ノホシ サョ" 
30 GOTO 1 0 

RUN によって ^ ？と閭 いてきたら、 アキ フカ シても 何ても 適当な 5 文字 を 入力して みて ぐ ださい。 棻 
しい 名句 マガ つぎつぎに 表示され る はす。 

ス 卜り ンク 変数 は、 READ、 DATA 命令と 組み合わせた フロ クラ^ち 可能て す。 



1 〇 READ X 1 $， X2S 

20 PR I NT X 1 $; "スキ 卜 ィゥヒ 卜 力、、 " ； X2$ 
30 DATA アナ タ 力、、 ， キ ライ テ、、 ス 
RUN 

アナ タ 力、、 スキ 卜 ィゥヒ 卜 力、、 キ ライ テ、、 ス 

READ 命令 を 使った 場合 も、 クォーテーションマーク ガ必 
要ない ことに 注 窓して ぐ ださい。 

^%^&^^7A ち い 巧、 力"？ 

10 \A/A も = '， ヮ、 ソ"： H A$= 1 りい ソ' 1 
20 PRIIVT WA$ ； 

30 FOR WH = 1 TO 100： PRINT HA$; 
40 NEXT 



ス リンク 'ぁス へ 0 —ス 
は ir,:(? く^ なん 
だよ 



DATA つ タ i ^力'； キ "へ ザ' ス 





LEFTS ( ) 、 M I D$ ( ) 、 R I GHT$ ( ) は、 いすれ もス 卜り ンクの 中の 一部 を 取り 
出して、 新しい ス卜 リンク を 作る^ めの 命令て す。 



ゥマ ヒ ッシ' 



サル 卜 1 リ 



左なら 1 4 St I 



10 A$= "ネ ゥシ 卜ラ つ タツ 
20 BS = LEFT$ (AS. 1 4) 
30 PR I NT B$ 
RUN 

ネゥシ 卜 ラウ タツ 5 



LEFTS CA$, 1 4) は、 AS にあ だる ス卜 1 リンクの 中から、 左から 数えて 1 4 番目 まて を 拾い 
出して、 新しい ス卜 リンク を 作り出す 仕事 をし ます。 そして ここて は、 その 新しい ス卜 リンクに、 B 
$ とい ラス 卜 リンク 変数が 定義され だ わけてす。 

ス卜 リンクの 右から 数えて、 いぐつ か を 拾い出す に は R I GHTS ( ) を 使います。 




40 C$ = R I GHTS (A$, 1 0) 4k 
50 PR I NT C$ 
RUN 

サル 卜リ ィヌ ィ 



ス卜 リンクの 中間に ある 何 文字 か を 拾い出す に は、 M I D$ ( ) を 使う と 便利て すべ 



60 D$=M I D$ (A$. 
7 0 PR I NT D$ 
RUN 

ゥマ ヒッ シ'' 



^から 1 6Sf I の S 




-- —— ■ 








ウダ b プリ' mv hj や 



<^LEFT$CA$,14)/ 



ネ ウジ ゲ 9^ t 








サ マズ 丫 




ゥ ir^t"/ ジ 
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LEN ( ) は、 ス 卜 1 」 ンクの 文字 数 を 知り だい 
ときに 使われる 命令て す。 だとえば 簡単な 例て は、 

10 AS= " ABCDEFG" 
20 PR I NT し EN (AS) 
RUN 
7 

となり、 ス 卜 1 リンク 変数 A$ の 文字 数つ ま り「 7」 
ガ 表示され る わけてす。 

LEN ( ) を 使って、 正方形 を 描く プロ クラ 乙 
を 作って みました。 




き 零 卿 




10 PRINT "H " ： PR I NT " - マー ヮヲ ョコニ ナラ へ、、 テフ タ、、 サイ 

2 0 I NPUT A$ 

30 FOR 1=1 TO LEN (A$) -2 

40 PR I NT TAB (2) SPC (LEN (A$) -2) ； " • " 

50 NEXT I 

60 PR I NT TAB (2) ； A$ ： GOTO 20 



I NPUT する 「 • 」 の 数 を いろいろ 変えて みて 下さい。 コンピュータ は LEN ( ) によって その 
数 を 数えて 作囡を 行う のて す。 

つぎに 「 • 」 以外の 文字 • 記号ても、 作囡 てきる ようにし ましょう。 ここて は LEFTS ( ) を 使 
つて 前の フ 口 クラ 乙の 文 番号 2 0 と 4 0 を 変更し ます。 

20 INPUT A$ ： AA$ = し EFT$ (A$， 1) 

40 PR I NT TAB (2) ； AA$ ； SPC (LEN (A$) -2) ； AA$ 

LEN を 使う とこん なス卜 リンクの/ X レー ドガて きます。 



10 S$= " SHARP BASIC" 


1 0 SS=" SHARP BASIC" 


20 FOR 1=1 TO LEN (S$) 


20 FOR 1=1 TO LEN (S$) 


30 PR I NT LEFTS (S$, I ) 


30 PR I NT RIGHTS (S$, I) 


40 NEXT I 


40 NEXT 1 


RUN 


RUN 


S 


c- 


SH 


1 C 


SHA 


S 1 c 


SHAR 


AS 1 C 


SHARP 


BAS 1 C 


SHARP 


BAS 1 C 


SHARP B 


P BASIC 


SHARP BA 


RP BASIC 


SHARP BAS 


ARP BASIC 


SHARP BAS I 


HARP BASIC 


SHARP BAS I C 


SHARP BASIC 



A S C について' 




1 0 PR I NT ASC ( " A ") ； 
20 PR I NT ASC ( "ABC " ) ; 
30 TS= "Z " ： PR I NT ASC(TS) 
40 END 
RUN 

65 65 90 
READY 

ASC の （ ） の 中に ス卜 リンク を 入れて RR I NT 
させ まし だ。 その 結果 はすべ て 数字に なって います。 
実は、 この 数字 は アスキー コード を 示して いるの てす。 
コンピュータて 用いられる すべての キャラクタに は、 
この アスキー コードが つけられて います。 124 ページに 
その 表ガぁ り ますから 参考に して <だ さい。 
ASC ( ) は （ ) 内の ス 卜 1 」 ングの 最初の 文字に 
対する アスキー コード を 取り出して ぐれる ものて す。 
文 番号 10 と 20 て は （ ） 内の ス卜 リンク ガ 違って い 
るのに、 その 結栗ガ 同じて ある 理由 もこの ことて わか 
ると 思います。 アスキー コード は、 255 以下の 数て す。 



C H R $ について… 

キャラクター を アスキー コードに 変換て きる のなら、 その 逆の 命令ち あるの ガ あだり まえ。 そのと おり, 

CHR$ という 命令 ガ それて す。 




PR I NT CHRSC65), CH R$( ASC( " K " )) 

A K 

READY 

つぎに 数字て 暗号 を 作って みまし だ。 CHR$ に 解読 
してち らい ましよ o。 



10 FOR 1=1 TO 24 ： READ A 

20 B$=CHRS (A) 

30 PR I NT B$; ： NEXT ： END 

40 DATA 73， 196， 8 3., 84, 85, 68 

50 DATA 89， 196， 66, 65, 83, 73 

60 DATA 67， 1 96, 79, 70， 1 96, 

70 DATA 90, 45, 56， 48, 67, 46 

RUN 

I— STUDY— BAS I C-OF-MZ-80C. 
READY 



マス キ-コ -にゥ 83 は ^ 



お ふ 



1-^ 



T 
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S T R $ について… 

10 A=1 2 ： B=3 ： C=A+B 
20 C$ = STR$(A) + STR$CB) 
30 PR I NT C, CS 
40 END 
RUN 

15 1 23 

READY 

STR$ (A) によって、 変数 A の循は そのまま 
数字 列と な C ス 卜 1 」 ンク 処理され る ことにな り ま 
す。 C$ の 内容 ガ 1 2 3 となる 理由 もお わかりて 
しょう。 つぎの フ 口 クラ 乙て は STR$ を 使って 
デ一 夕の 「•」 を 合わせて います。 




1 0 FOR X=1 TO 5 

20 READ A 

30 L = 5-LEN(STR$( I NTCA))) 

40 PR I NT TAB (し）； A 

50 NEXT ： END 

60 DATA 1.23456, 1 2.3456 

7 0 DATA 1 23.456. 1 234.56 

80 DATA 1 2345.6 



左の プログラムの 結 栗 はつぎの ょラ になり^す c 
RUN 

1 . 23456 
1 2. 3456 
1 23. 456 
1 234. 56 
1 2345. 6 
READY 



V A 



ついて' 



命令 は、 ST R$ 命令の まつだく 逆の 機 
能 を もっています。 つまり 数字 列の ス卜 リンク 
を 数礦に 変換す る ものて す。 



10 AS= " 1 23456 " 
20 B = VA し （A$) 
30 C=65432 1 +B 
40 PR I NT A$ 
50 PR I NT B 
60 PR I NT C 
80 END 
RUN 

1 23456 

1 23456 j 

フフ フフ フフ 
READY 




二 G まち Ki. ヒも つる g 



• 数値て はありません。 ス 卜 1 」 ンク てす。 

数値な のて 数 鐘の 最上 位の 前に 土 の 符号 を 入れる ために ひとつ スぺ 
ースガ あります。 負のと き は、 そこに マイナス 符号 かはいり ます。 
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任意の けた 数の 整数 を I NPUT 命令て 読みと つて、 右から 3 けた ごとに コンマ 「,」 をつ けて 軎き 
だす フロ クラ^て す。 整数と して 0 を 与えたら 完了す る はすて す。 



^5 



10 PRINT"tz イス ゥ ラ カイ テ クタ、、 サイ"； 
20 INPUT X$ 

30 IF XS= " 0 " THEN STOP 
40 PR | NT " ¥ " ; 
50 FOR Y=1 TO LEN (X$) 
60 PR I NT M I D$ (X$, Y, 1) ； 
7 0 Z = LEN (X$) - Y 

80 IF Z/3<> I NT (Z/3) GOTO 1 1 0 
90 IF 2-0 GOTO 1 1 〇 
100 PR I NT " ， " ； 
1 1 0 NEXT Y 

1 20 PR I NT' '円" ： GOTO 1 0 
RUN 

セ イス ゥ ヲ カイ テ クタ、、 サイ 9 1 23456789 
¥123,456, 789 円 
セ イス ゥ ヲ カイ テ クタ、、 サイ 7 1234 
¥1 , 234 円 



？ つ 



んリ 



f リ 'ゆ 7) れ) 



"き は 



と 



V 




文 番号 8 0 て、 右なら 数えて Z 番目の 文字 ガ 3 の 倍数の け e て あるか どうか を 確かめて います。 もし 
3 の 倍数て あれば 文 番号 1 00 の 命令文で 「, 」 を 入れる ことにし だ わけてす。 たとえば 入力し だ 整数 
を 9 けだと して こんな 具合に。 



I NPUT し^ 整き 
Y の 変化 
Z の 変化 



NPUT しだ 整数の 文字 数 
一 し EN (X$) 



1 23456789 
876543210 



Z = し EN (X$) -Y— 



右から 読ん て も、 左から 読ん て も 同じ 言葉になる などうな を 確かめる プロ クラ^ を 作って み^しょう。 
ちちろん、 文字ても 数字ても かまいません ガ、 濁点、 半濁点 を使ラ と、 おかしな 所に これらの 記号 力' 
ついて しまいます。 

1 0 PR I NT"H" 

20 PR I NT " S キ、' カラ ヨン テ、、 モ ヒ タ、、 リ カラ ヨン テ、、 モ 

30 I NPUT X$: PR I NT 

40 FOR Y=LEN (X$) TO 1 STEP -1 

50 PR I NT TAB (2) ； 

60 PR I NT M I D$ (X$, Y, 1 ) ； ： NEXT Y ： PR I NT 

7 0 GOTO 30 



江戸時代 は、 不定 時 法と いって、 曰の 出から 曰の 入り まての 時間と、 曰の 入りから 曰の 出 まての 時間と 

を、 それぞれ 别々 に 6 等分して B き 間 を 区切って いまし だ。 つまり 同じ 1 刻 （約 2 時間） といっても、 戛 
と 冬と て は 長さが 違って いだの てす。 このよう にして 1 曰の 時間 を 12 に 分け、 貢 夜中から 順に、 ね、 う 
し、 とら …… と、 12 支の 順に 名称 をつ けて いまし だ。 

草木 も 眠る B 満っ 時な どの 言葉 は ごこから 来て おり、 今 曰の 時間て ぃラと 午前 2 
K 頃に 当 だり^す。 家た、 各 1 刻 はさら に 半分に 分け、 前半 を 初 刻、 後半 を 正 刻 
と 称して いました。 

今 曰ても、 お昼の 1 2 時 を 正午と いうの は、 その 名残りて す。 
記録に 残って いる 我ガ国 最古の 時計 は 水時計て す。 当時 は、 宮廷に 漏刻 博士と い 
う 時間 係りの 役人が いて 水 時 it て 時刻 を 知り、 たいこ を 叩いて、 それ を 知らせて 
いました。 低い 万に 落ちる 水の 璗て 時間 を 計って いたのて すから、 当時の 時刻 は 
江戶 時代より 正確 だつ だてしょう し、 現代の ように 昼夜に 関係な く 1 曰 を 12 等分 
する、 いわゆる 定時 法に よっていだ わけてす。 

G いこの 合 IS は、 1 刻 ごとに 9 の 倍数 だけ 叩ぐ のガ 原則て すが、 ごれ て は 回数 ガ 
多すぎる のて、 だとえば 9x3=27 のとき、 はじめの 2 を 省略して 1 けだ 目の 7 だ 
けの 数 を 叩いて いました。 昔の 時刻の あらわし 方の、 もう ひとつの 方法、 九つと 
か 八つな どガ、 時刻 か 進む につれ て数ガ 減少して いぐの はこの だめて す。 この や 
つ 万 は、 江戶 時代に ち 引き継がれ、 だい この 代りに 鍾を ついて 時刻 を 知らせる ょラ になり まし だ。 これ 
を 「時の 鍾 」 といい、 当時の 人^ち はこれ によって 時刻 を 知った わけてす。 
なお、 時の 鍾は、 今 曰ても 東京 近郊の 川越币 に g のま ま 残って おり、 g をし の ふ 'ことかて きます。 



叩ぐべき 
たいこの 数 
9x1= 9 
9x2=1 8 
9X3=27 
9x4=3 6 
9x5=4 5 
9x6=54 
3 0 分 璽ぎ にち 
たいこ を 0D いた 
1 /4 刻… 1 
2 ノ 4 刻… 2 
3/4 刻. '.3 



銀行に 1 万円 預けて 1 年後に 1 万 600 円 だけ 受けと つたら、 利率 は 600/1 0000= 0. 06(6%) だと わかり ま 
す。 て は 2 年間 預け; 5 ら、 利息 はいぐら ついている てしょう か 7 

この場合 は 2 通りの 考え方が あります。 ひとつ 目 は 1 年間て 600 円の 利息； tf ついだ の だから、 2 年間て 
は 2 倍の 1200 円の 利息に なるとい o 考え方て す。 これ を 単利の 利息 計算と いいます。 
ふだつ 目 は 1 年間て 利息 600 円ガ ついてい るから、 2 年 目の 初めに は 1 万 600 円の 預金に なって いる。 
そこて 2 年 目の 利息 は 10600x0. 06=636 円に なり、 合わせて 1236 円の 利息に なるとい ラ 考え方て す。 こ 
れを 複利の 利息 計 g といし \ ます。 

複利 its の ほうか 単利 計算より すこし 多い 利息に なって います ガ、 もっと 金額が 大きかっ^り、 もっと 
長い 期間 預ける と、 利息の 差 はもつ と 大きく ひらぐ はすて す。 

それぞれの 利息 計算て n 年 目の 元利 合計 を 求める 式 はつぎの ようになる ことが わかります。 



単利に よる 元利 合計 （ n 年 目、 利率 R) 
B = X (元金） +n ■ X • R 

複利に よる 元利 合計 （ n 年 目、 利率 R) 
C = X • (1 +R) n 

この 式 を もとに、 単利と 複利て 元利 合計 を St 算す 
る フ0 クラ^ をつ <っ てみ ましち。 



1 0 
20 
30 
40 
50 
60 
70 
80 
90 
1 00 

1 1 〇 

1 20 
1 30 
1 40 
1 50 
1 60 
1 70 
1 80 
1 90 



PR I NT 
I NPUT 
PR I NT 
I NPUT 
PR I NT 
I NPUT 
PR I NT 
PR I NT 
PR I NT 



'力、、 ン キン l\ イクラ 
X 

'キン リ 八 ナン ％ " ； 
R 

'ナン 年 マテ * 5 マスカ 



Y ： PR I NT 
力、、 ン キン = " 
キン U = " 
年'' ； TAB(4) ； "タン リ'' ； 
PR I NT TAB( 1 5) ； '"フク リ'' ； 
PRINT TAB(26) ； " ソ ノサ" 
FOR A=1 TO Y 
B=X + A • X • (R/1 00) 
C= I NT (1 O^X ■ (1 +R/1 00)T A)/1 
D=C-B 

PR I NT A ； TAB(4) ； B ； 
PR I NT TABC1 5) ;C ； TABC26) ； D 
NEXT A 

PR I NT ： PR I NT ： GOTO 10 



： の プロ クラム を 実行し だ 具体的な 例 を 示します。 




力、、 ン キン =1 0000 
U =6% 
タン リ 
1 0600 
1 1 200 
1 1 800 
1 2400 
1 3000 
1 3600 
1 4200 



フク リ 
1 0600 
1 1 236 
119 10. 
12624. 
1 3382. 
14 185. 
1 5036. 





ン年 1234567 

キ 





こうやって n 年後の 元利 合計 を 求める と 

Mn=X(1 +R) n +X(1 十闩^リ…+ズ^ +R) 

となり、 これ を さらに 簡単に 表わす と 

Mn=XCC1 +R) n+1 - （1 +R))ZR 

さて、 ffi 年 同じ 額 を 預けて、 希望す る 年の 元利 合計 ガどラ 
なって いるか を 示す プロ クラ 乙 を 作って みます。 だ だし、 
同じ 額 を 預ける としても、 その 最低 額と 最 S 額 は 入力て きる 
るよ ラ にして おき まし だ。 

1 0 PRINT" キン リ 1\ ナン ％ テ、、 スカ " ； 
20 INPUT R 

30 PR I NT " 力、、 ン キン ノ ハン ィ ヲ 卜、、 ゥ ソ、、 " 
40 PRINT" サイ ティ 1\ " ； ： INPUT L 
50 PR INT" サイコ ゥ ハ "；： INPUT H 
60 PR INT" ナン 年 マテ、、 ミ マスカ " ； 
70 INPUT Y ： PR I NT ： PR I NT 
80 PR I NT " キン リ= "； R ； " %" 
90 PR I NT" マイ 年" ； TAB(1 2) ; Y ； "年 メ'' 
1 00 R=R/1 00 

110 FOR A=L TO H STEP 1 0000 
1 20 B= I NT(A*((1 +R) T(Y+1)-(1+R))/R) 
1 30 PR I NT A ； " 円'' ；丁 AB(1 2) ; B ； " 円'' 
140 NEXT A 

1 50 PR I NT : PR I NT: GOTO 10 






キのブ ロワ ラ ^考 行し だ 結 栗 は 



前例て は、 一度お 金 を 預けた とき、 単利と 複利て 利息 ガど 
O ちガ うか をみ たわけて す。 しかし、 定期預金 のように ffi 
月 S 月お 金 を 預ける やり方が く 私 だち に はもつ と 身近に 想 

じられ ます。 

そこて、 決まった お金 X を 今年 預けて おけば、 1 年 目 は X 
(1 +R)、 2 年 目 は X(1 +R)2 という 具合に 元利 合計 は 
大き <な つてい きます。 それに加えて、 岳 年 定期的に お金 
X を 預ける と、 1 年後に 預けた お金に ついても、 預け入れ 
から 1 年後、 つまり 今から 2 年後に は X( 1 +R) となって 
いる はす。 この 増え 方の ようす をつ ぎに 示します。 

1 年後の 元利 合計 （X は 元金、 R は 利率） 

Mi = X(1 +R) 
2 年後の 元利 合計 

M 2 =X(1 +R) 2 +XC1 +R) 
3 年後の 元利 合計 

M3=X(1 




円 円 円 

y 494838 



リ 4* 0 0 & OJ & lut 



困 一 




フ 口 クラ^の 中て、 同じ 処理 方法の 仕事が 何回も 
綴り 返し 出て ぐる ことがあります。 このよう なと 

き、 その 仕事 だけ を 小 ブ0 クラ^と して まとめて 

おいて、 主 プロ クラムから 必要に sis じ 何度ても そ 
こに 飛ん て 行って 仕事 をす る 方法 かあります。 こ 
の 小フロ クラ^ をサ フルー チンと いい、 サ フルー 
チンに 飛ん て 行 < だめの 命令に GOSUB ガ 使わ 
れ ます。 GOSUB を 使った フ 口 クラ^の 例 を 次 
にあけ てお きました。 




1 0 


PR I 


NT" 


a " 




20 


PR I 


NT 


TAB 


(1 0) 


30 


PR I 


NT" 




5 


40 


PR I 


NT ' 


nuf" 


nnrr 


50 


PR I 


NT " 




ォ 5 ソ •• 


60 


PR I 


NT " 


n 


ォ サ卜ゥ 


70 


PR I 


NT " 


n 


ォサケ " 


80 


PR I 


NT" 


□ 


シ 3 ゥュ 


1 1 0 


PR I NT 'にに' 





" ■ • ゥリァ ケ、、 ヒ ヨウれ " ： PR I NT 

10 15 20 2 5 30 35" 

innnnnnnnn^-^nnnnnnnnnn " 



― 一一 ！ 1 

GOSUB 200 
： GOSUB 200 

GOSUB 200 
: GOSU 已 200 



1 20 PR I NT ： END 

200 PR I NT " に J" ； ： READ A 

21 0 FOR N=1 TO A ： PR I NT "Sf " ; ： NEXT N 

220 PR I NT A 

230 RETURN 

240 DATA 20, 15, 21 , 2 4 



上記 プログラムて、 サ フルー チンに 当たる 部分 は、 文 番号 200 ~2 30 てす。 サ フルー チンの 終りに 
にある RETURN 命令に よって、 処理 はふ だ^び 主 プロ クラ 乙に 帰ります。 



プロ クラム を 作って RUN させても、 1 回て 思つ だ 通りに 動いて ぐれる と は 限りません。 そんなと き、 
適当な ところに STOP 命令 をブロ クラ^し ておいて、 止まつ だとき の 変数 ガ どんな 内容に なって い 
るか、 確かめた いとき ガぁ ります。 だとえば、 つぎの ブ □ クラ 乙て は、 



1 0 
20 
30 
40 
50 
60 
70 
80 
RUN 
BREAK 



READ A, B 
X=A • B 

STOP 

Y = AZB 
END 

PR I NT X， Y 
DATA 1 5, 5 
END 



N 30 



CON T 命令が 使える ケース 



となり ますね。 このと き タイレ ク卜 モードて 

PR I NT A, B, X fCRl 
と 変数 を 表示 させて プロ クラ^の チェ ッヮガ て 
きる はす。 そこて ブ 口 クラ^ を ふ ただび 始めな 
いとき は 



國フ ログ ラムの 実行 を [S±LLEll 

キーて 中止した いとぎ 
■ STOP 命令、 END 命令て 実行 を 中止し 

だとぎ 

画 I NPUTm 令 r fgmr n 
キーて 入力 を 中止した とき 

CON T 命令が 使えない ケース 
■RUN て 実行す る 前のと き 

画 実行 を 止め だ あと、 ブ 口 クラ 乙 を 編集した 
とさ 

謂 実行中の エラーて" READY" に 戻って 

しまつ だとぎ 
国力せ ッ卜 テープの 操作 を BREAK 1 キーて 

中止した とき 



CONT |C_R] 

と コンピュータに 命令 を^え てくだ さい。 止まった ところから コンピュータ は 実行 を 再開して くれ ま 
す。 そして、 つぎの 文 番号 50 の END 命令て" READY " と 表示し、 まだ 止まって しまいます。 
こんど は、 タイレ ク卜 モードて . . 

X = 3 •• Y = 5 |CR] 

として みだらい かかて すか 7 …… CONT 命令て まだ ブ 口 クラ 乙 を 続行 させ だら、 変数 X と丫 は、 
3 と 5 ガ 表示され るて しょう。 

つぎの プロ クラム は、 メビウスの 摁 のようにい つまても * マークの 三角 山 を 表示し 続ける ものて す。 



1 0 
20 
30 
40 
50 
60 
70 



A=0 ： B=38 ： C=1 
FOR X=A TO B 
FOR Y=0 TO X 
PR I NT " • " ; 
NEXT 丫： PRINT 
K=A ： A= 巳 ： B=K 
C=-C ： GOTO 20 



C 



NEXT X 



ここて f§H i 「丁| キ一を押しなガら 旧8£八1<1 キー 
を ぐと、 実行 を 中止し ます。 そこて 今度 は 

1 00 END 
とフロ グラ^ を 追加して から CO'NT 命令 を § え 
ます。 すると 

CONT ERROR 

そうなん てす。 STOP 命令、 END 命令 あるいは キーて 命令 を 中止し^ あとて 文 番号 を 
使つ だブロ クラ^の 編集 をし だら、 CONT 命令 は 使えない ことに 注意して < ださい。 




GOTO 命令に ついては、 もうす てに 何度も 出て きました。 ここて は、 GOTO 命令の 機能 を、 もう 
少し 拡大し; e〇N—GO TO 命令に ついて IS ベて み 5 しょう。 



ON I 変数 または 数ぱ GOTO ess, mg, Eig- 



I 

： の 値が 1 のとき 

" 2 のとき 
" 3 のとき 



だとえば、 ON の 後の 変数 または 数式の 值ガ、 3 て あれば GOTO 以下に 並ん ている 3 番目の 文 番号 
に 飛 ふこと になります。 つまり、 変数の 纏に しだ かって フロ クラ 乙の 分岐 先 を 指定て きる のて す。 



10 IN PUT" カス、、/ 
20 ON A GO TO 
50 PR I NT " xxx 
60 PR I NT 
7 0 PR I NT 
RUN 

カス、、 /\ ■? 1 



2 



？ " ； A 

50 ， 60， 7 0 
GOTO 1 0 
GOTO 1 〇 
GOTO 1 0 




カス、、 八 ？ 
YYY 

カス、、 ハ 9 



ここて ON... GOTO を 使って/ V \ 'ヌキ ゲー^ を や 
つてみ ます。 5 枚の 札の 中に 1 枚 だけ 「パパ」 が 入 
つてい ます。 「パパ」 は どの位 冒に あるか わかり^ 
せん。 そして あな だは 何枚め に 「パパ」 か あるの か 
当てて コンピュータと 勘 比べす るの てす。 
ブ □ ワラ 乙 中て 「パス をし ます か」 と簡 いてき^す 
から バスなら 1、 バスし ないなら 2、 この ゲー乙 を 
やらないなら 3 を キー入力 する ことにします。 パス 
は 3 回 まてて きます。 




名 さ 屋^ 




1 0 
20 
30 
40 
50 
60 
70 



R= I NT (5 • RND ( 1 ) ) +1 
N=N+1 ： I F N=6 THEN 1 20 



RND は 74 ベ— 



NPUT X 



PR I NT" コノ カイ l\ 八 。ス シ マスカ •？"： 
ON X GOTO 60. 90， 50 
PR I NT" コ 、、クロウ サ マ！！ に： GOTO 1 20 
NP-NP+1 

IF NP> = 4 THEN NP = NP - 1 : N = N - 1 : PR I NT 

" ノコ リ セ、、 ン フ、、 ヒィテ フタ、、 サイ " 
80 GOTO 20 
90 NR=NR+1 

1 00 IF R=NR+NP THEN PR I NT " シ、、 ヤーン！！ 

力、、 テ、、 タ" ： GOTO 1 20 
110 PR INT "セーフ！！ ラッキー テ、、 シ タネ"： GOTO 20 
120 END 



ON—GOTO の ffil きとよ く 似た 命令に、 ON—GOSUB 命令 かあります 
1 〇 ON 



戻つ 



変数 または 数式 



GOSUB 



20- 



： の値ガ 1 のとき 
2 のとき 
3 のとき 



『 



文 番号 X 
RETURN 



サ フルー チン 



文 番号 Y 
RETURN 



サ フルー チン 



文 番号 Z 
RETURN 



サ フルー チン 



3 



この RETURN 命令に よって 
ON—GOSUB 命令文の つぎの 行に 
戻る ことに 注目 ！ 



文 番号 X 



文 番号 Y 



J 



文 番号 Z I. 

I 



t 



文 番号 Y へ 文 番号 Z へ 



GOSUB. ON …… GOSUB は 多重に 使える 

1 0 ON X GOSUB 1 0 0, 200 
r> 20 



r 

1 00 ON Y GOSUB 300, 400 
1 1 0 RETURN 

I 

300 ON Z GOSUB 500, 600 

31 0 RETURN 
500 RETURN 



そこて 腕 だめし に 時間割の プロ クラム を考 えてみ ました。 つぎの フロ クラムて とぐ に 大切な こと は、 
文 番号 90 て 文 番号 1 70~1 9 0 のサ フルー チンへ 飛ん ている にも かかわらす、 さらに 文 番号 1 80 
てサ フルー チン を 呼び出し ている 点て す。 
このように GOSUB は、 多重に 使える 便利な 働き者な のて す。 



10 A$=' 'コク コ、、 "：B$=" スゥ 力、、 ク 

20 0$=っ」 力 " ： E$= ' 'オン 力、、 ク 

30 G$= "シゃ カイ " ： H$= " ヒ、、 シ * ュッ 

40 J$=" 卜、、 ゥ卜ク "：K$="HR 

50 I NPUT " ナン ヨウ ヒ、 、マ " ； X$ 

60 X = ASC(X$)-1 1 1 

70 FOR 丫 =0 TO 4 ： PR I 

80 NEXT Y ： PR I NT 

90 ON X GOSUB 170.1 



C$= "エイコ、、 
F$= "タイ イク 

I $= " キ、、 シ、、 ュッ 



NT TABC2 + 7 • Y) ； Y+ 1 ； 



10， 1 20, 1 30, 140, 1 50, 1 60 



1 00 PR I NT ： 

11 0 PR I NT "月 

1 20 PRINT" 火 

1 30 PR I NT "水 

1 40 PRINT" 木 

1 50 PR I NT "金 

1 60 PRINT "土 

1 70 FOR Y=1 



50 

A$ ： B$ 

B$ ； E$ 

CS ： CS 

B$ ： D$ 

A$ ； D$ 

B$ ； G$ 
TO 6 



1 80 ON Y GOSUB 1 1 0， 
1 90 PR I NT : NEXT Y 



: D$ ： G$ ： KS ： RETURN 
； HS : HS : DS ： RETURN 
； I $ ; A$ ； FS ： RETURN 
； FS ; G$ ： E$ ： RETURN 
： I $ ; C$ ： C$ ： RETURN 
； DS ； KS ： RETURN 



1 20, 1 30， 1 40. 1 50, 1 60 




200 RETURN 



1 0 0 個の データ を 変数に 代入す る こと を 考えて みます。 だとえば 変数 A 1 とか A2 とか を 使う と 



10 A1 =5 
20 A2=30 
30 A3=1 2 



ちょっと 待って < ださい。 大変な ことにな りそうて す。 フロ クラ^ 文 を 1 0 0 個 も 裏 かな < て はなら な 
いなんて ！ …… こんなと き 新しい 変数の タイ ブ として 1 次元 配列と いう もの を 用いる と、 とてち 便利に 
なります。 1 次元 配列と は どんな もの かさつ そくみ てみ ましょう。 



もり^ 敉 



( も 一 岑^! をソ /o^ 汀。。 ま r;/off(D 

3%^- ど 1 ' う に 

おん 




1 次元 配列と いう ものが わかりました か。 配列 を 

使って 最初の ブ0 クラ Z_s をつ ぐって みま した。 

1 0 DIM A(1 00) 

20 FOR J=1 TO 1 00 

30 READ A(J) 

40 NEXT J 



どラ てす。 非常に 短い プロ クラ ZJ こなり ますね。 
この 例ても わかる ように 配列の 形 をした 変数 は、 
たとえば A (J) とい ラ ように 添字つ き 変数の 力 

ッコ のなか を 変数 j て 指定す る こと/ rc き、 それ 

が 大きな 武 88 となって いるの てす。 



50 DATA 5， 30， 1 2, 




！ 鍵 A セ 配 

奇令. ザ； 

レ 





闬 ^し讧 も'、/ ナ て', まだ ま 敏^， 
中には.^ 0 ず 入って 3 " ん" や.〕 



A ひ o)=2t3 




2" ば タも' お- 
ョ' 7 フラショ.^ 



,ォ".八〃 めに 入つ？ 

^のじ' や一' 





用^し 力/ U 5 ^リウ 中に 欤^ 2+3^ _ 

ヮ: rf*^ifez ヽ^ ヌ し り； 



マ r 

^グる じ 



数媚 変数に 配列; tf あるの なら、 ス卜 | リンク 変数に =1 , 配 5 が あ- ： ひ 'よさそう な 4 '- 
そラ てす。 ス卜 リンク 変数の 場合 も、 同様に 配列 ガ 使用て きます。 
r 変数の 1 次元 配列と は どんな もの か、 ここて 紹介し ます。 



'iH^m^rm) しな さ レ》 



《ひ 巧） り 中り; a リン 7'' 
つま' 人 





g 彻ゥ れス/-'/ ン 7 

± z m 'お 



"(ま クべ％ ク; 
ZX- にな^/さ "n つ ノ 



?V"x" さ 足 すの も'、 





簡単な プロ クラ^ を 作って みま しだ。 

このように、 いくつかの ス卜 リンク を 配列に 入 れ てお くと、 その ス卜 リンク を使ラ だび に 霞き 込む 必要 
がありません。 フ 口 クラ^ 自体 もす つきり した ものになります。 



1 0 DIM A$(2), BS(2), CS(2) 

20 FOR J=1 TO 2 ： READ A$(J), BSCJ) 

30 C$(J) = A$(J)+ " "+BSCJ) 

40 PR I NT ASCJ), B$(J), C$(J) 

50 NEXT J 

60 END 

70 DATA YOUNG, G I RL, WH I TE, ROSE 



RUN 
YOUNG 
WH I TE 
READY 



G I RL 
ROSE 



YOUNG G I RL 
WH I TE ROSE 



67 



テス 卜 をす るの はいい けれど、 テス 卜の 結 業 を 集 it する のがめ んどラ だとい う 先生。 それなら テス 卜 
を やらなければ よいと いう 学生。 そういう 訳に もい かない 先生の だめに よい 方法 を 教え^しよう。 配 
列 を 使えば、 もう 悩む こと もありません。 
つぎに 学生 番号と 数学の 点数の データ があります。 



学生 番 g 


20 


1 5 


1 2 


■： し' 


23 


1 6 


31 


45 


26 


1 1 


点数 


75 


51 


28 


56 


1 00 


81 


60 


43 


66 


48 



成績 順に 並び かえた ファイルの プロ クラム を 作って みまし だ 



1 0 
20 
30 
40 
50 
60 
70 
80 
90 
1 00 
1 20 
1 30 
1 40 
1 50 
1 60 
1 7 0 
1 80 
1 90 
200 
21 0 
220 
RUN 
セ イセ キ 



DIM A (1 0) . B ( 1 0) 
FOR J=1 TO 10 
READ A (J) , B (J) : NEXT 
FOR K=1 TO 9 ： M=0 
FOR J=K TO 1 0 
IF B (J) <=M THEN 80 
M=B (J) ： L=J 
NEXT J 

B (L) =B (K) ： B (K) =M 
A1 =A (し）： A (し〕 =A (K) ： A (K) 
NEXT K 



PR 
PR 
PR 
PR 
PR 
FOR 



NT 
NT 
NT 
NT 
NT 
J =1 



セ イセ キ シ、、 ユン ィ （スゥ 力 



力 * クセィ ハ、、 ン コ、、 ゥ' 



TO 1 0 




=A1 



PR I NT 
END 

DATA 20, 
DATA 1 6, 



A (J) ； TAB (1 4) ； B (J) ： NEXT J 



75, 
81 , 



1 5， 
31, 



51 , 
60, 



1 2, 28, 
4 5,. 43, 



40, 
26, 



56, 
66, 



23, 
1 1 ， 



1 00 
48 



シ * ユン ィ （スゥ 力、、 フ） 



力、' フセィ 八、' ン コ、、 ゥ 

23 

1 6 

20 

26 



1 00 
81 
75 
66 



フ 7 丫 / レ お '/杏う 
山し に 



よぐ 単語 帳 をつ かって 奂 単語の 勉強 をし た ものて す。 コ 

ン ビュー タを 使っても つと スマ一 卜て 簡単な 単語 帳 をつ 
ぐる 方法 ちあります。 

奂犖 語と その 意味が 各 ファイルの 中に 入って います。 その 
中から とり 出した 奂犖 語の意味 を 問う ものと、 その 逆て 

ある 英単語に 直しなさい という 2 適り の 問題 を 出します。 
フ0 クラ^て は、 英単語、 その 意味の 入って いる フ アイ 
ル として 一次元の ス卜 リンク 配列 を 用いる ことにします。 
さあ、 つぎの フ 口 クラ 乙 を RUN させる と、 いろいろと 
問題 かてて きます。 あなたの 奂語カ を ちょっと 試して み 
てくだ さい。 




1 0 
20 
30 
40 
50 
60 
70 
80 
90 I 
1 00 
1 1 0 
1 20 
1 30 
1 40 
1 50 
1 60 
1 7 0 
1 80 
1 90 
200 
2 1 0 
220 
230 
240 
250 
260 
270 
280 
RUN 
タン コ、、 
F I SH 




DIM A$ (1 0) , B$ (1 0) , CS (1 0) 
FOR J=1 TO 10 
READ A$ (J)， B$ (J) 
C$ (J) =A$ (J) +B$ (J) 
NEXT J 

K= I NT (1 0 • RND (1) ) +1 
PR I NT "S タン コ、、 ノ ィ 5 /\ ナニ 7" 
PR I NT A$ (K)， 
INPUT X$ 
AXS = A$ (K) +X$ 
IF C$ (K) =AX$ THEN PR I NT 
PR I NT" マチ 力、、 ィ"： FOR M=1 TO 
PR I NT"D" ； SPC (1 0) ： PR I NT" 
PR I NT"H" ： GOTO 80 
K= I NT'C1 0 - RND (1) ) +1 
PRINT"SI<]*= ナオ シナ サイ 
PR I NT B$ (K) ， 
I NPUT Y$ 
YB$=Y$ + B$ (K) 

IF C$ (K) =YB$ THEN PR I NT 
PR I NT " マチ； 0、、 ィ'' ： FOR M=1 TO 
PR I NT"H" ； SPC (1 0) ： PR I NT" 
PR I NT"H" ： GOTO 1 70 
END 

DATA ATOM, ケ、、 ンシ， BOY, ショウ ネン， CAT, ネコ， D I SH 
DATA サラ， ELEPHANT, ソ、、 ゥ， F I SH, サ カナ， G I ANT 
DATA キヨシ、、 ン， HORSE, ゥマ， ROSE, ハ、、 ラ， TEACHER 
DATA セン セィ 



OK • ！ " ： GOTO 1 50 
500 ： NEXT M 

； TAB (12); SPC (25) 



-ン 



RND ( ) は 74 ベ- 



OK ！!" ： GOTO 60 
500 ： NEXT M 

； TAB (12); SPC (25) 



ノ イミ 



八 



ナニ *? 



この場合、 F I SH の 意味 をき いている わけてす から、 サ カナと 入れれば OK!! と 表示して 正解て あ 
る こと を あな だに 伝 えて ぐれます。 それ 以外の 答に は、 マチ ガイと 表示し 5 す。 さらに、 サ カナと き 
いてきて、 あな だガ F I SH と S える 場合 もあります。 



学生 3 人の 数学と 英語の テス 卜の 結果の 表 （下 0 の 左） にす こし 手 をく わえ だ 表 を 作って みました （下 
囡の右 ）。 



5 の 表て は 科目 を M (1 ~3) 、 学生 を N (1 ~3) として、 それぞれの 点数 を A(M， N) という 表 
現て 示して います。 このように すると、 とても 便利な ことかあります。 たとえば 

A (2, 2) ~ -M= 2 だから 英語、 N = 2 だから g 町 君 ~~ -谷町 君の 英語の 点数 

どうて す。 A (2， 2 ) と 書いた だけて 谷 町 君の 奂 語の 点数て ある ことが すぐに わかります。 A (M, 
N) の M と N はちかった 項目 を さしていた わけてす ね。 このように 2 つの 項目 をつ かって、 A(M, N) 
と 塞いた もの を 2 次元 配列と いいます。 項目が 2 つ あるの て 2 次元と いうの てす。 前に 出て き だ 一次元 
配列 はこの 頃目ガ 1 つ だけ だつ だのて す。 

コンピュータ てこの 2 次元 配列 を 使う とき どのように すれば よい か をつ ぎに みて みます。 



D/MA ぐ や 5) 



し" まお', 
二き さ^ 令 . 




行/: (5+7)111 り 変！^目 



wo4 き 



. 'も软 ^に 一は, 軟値ゆ しォ、 

ん U レら ん. 
胃^ C 能で/ま. 寸ぺ 7 タ 
為に 0 〔ゼ' ロバ、 '入， 2 

(、ます. 

, /\(M，N) で' M や N ズ、" り 

になつ り） さ 会^^! もお さ 
こりさ. ィ せの 1 fe: 牲匸 同じ' 
で '碑. 



一^ に 




中 北 


谷 5I 


藤 本 


•： 


•V X 


S TO 


藤 本 


数 学 | 92 


75 


72 科目 


\ N 
M 人 


1 2 


3 


突 語 


70 


94 


78 数学 


1 


AC1.1) 


AC1.2) 


A(1.3) 


国 語 


65 


60 


95 奂語 


？ 


AC2.1) 


AC2.2) 


A(2.3) 


国 語 


3 


AC3.1) 


AC3.2) 


A(3.3) 



N=1 
N = 2 
N = 3 



学 語 SS 北 町 本 

数 英国 中 谷 ほ 



あなたの 子供さん はもう 九九 はてき ます か。 えつ、 子供 ガ いる ほど 歲 とつち や いないって 7 いすれ 捋 
来 必要に な つ だとき は 使 つてぐ ださい。 

プロ クラ^に は 2 次元 配列 A (M. N) を 用いる ことにします。 つまり MXN の 纏 を A (M. N) に 
割り当てる わけてす。 



10 DIM AC 9, 9) 

20 PR I NT "H" 

30 FOR J=1 TO 79 

40 SET J, 6 ： NEXT J 

50 FOR J=3 TO 2 7 

60 SET 5, J :NEXT J 

7 0 PR I NT "EI クク ノ ケィ サン" 

80 PR I NT 

90 FOR J=1 TO 9 

1 00 PR I NT TABC4 - (J-D + 4); J ; 

1 1 0 NEXT J: PR I NT : PR I NT 

1 20 FOR M=1 TO 9 

1 30 PR I NT M; 

1 40 FOR N=1 TO 9 

1 50 ACM. N) = M - N 

1 60 PR I NT TAB(4 -(N-D+4) ； 

1 70 PR I NT ACM, N); 

1 80 NEXT N 

1 90 PR I NT 

200 NEXT M 

2 1 0 END 

RUN 

つつ ノ ケィ サン 






1 


2 


3 


4 


5 


6 


7 


8 


9 


1 


1 


2 


3 


4 


5 


6 


7 


8 


9 


2 


2 


4 


6 


8 


1 0 


1 2 


1 4 


1 6 


1 8 


3 


3 


6 


9 


1 2 


1 5 


1 8 


21 


24 


27 


4 


4 


8 


1 2 


1 6 


20 


24 


28 


32 


36 


5 


5 


1 0 


1 5' 


20 


25 


30 


35 


40 


45 


6 


6 


1 2 


1 8 


24 


30 


36 


42 


48 


54 


フ 


フ 


1 4 


21 


28 


35 


42 


49 


56 


63 


8 


8 


1 6 


24 


32 


40 


48 


56 


64 


72 


9 


9 


1 8 


27 


36 


45 


54 


63 


72 


81 



READY 



上の 表 を 作る のに わざわざ、 2 次元 配列に 数娼を 代入す る 必要 はない のて すが、 いつたん 配列 変数 A 
(M. N) に 代入して おけば、 任意の M, N に対して、 九九の 備ガ 計算な して 呼び出せる ことにな り 
ます。 2 次元 配列 は、 データの 行列 （マ 卜 リックス） を 構成し、 データの 取扱い を 2 次元 的に 行える 
特徴が あるの てす。 




ス 卜'」 ング 変数に も 2 次元 E 列 を 使用す る ことができます。 数値 変数の 2 次元 配列と 同様の 考え方て 
ス卜 リンクの 2 次元 マ 卜 リックス を 構成す る ことかて き、 簡犖な 例と して、 1 学年の 生徒の 名前 を、 
クラス 番号と、 出席 番号の 2 次元 データと して まとめ だ 名簿 を 作成す る 場合な ど 便利 だと 思われます, 



花 子 「ネ ェ、 太 郎君。 あな だ、 もしい ぐらお 金 
使っても いいと いわれたら、 何 を 買う "？」 

太郎 「ゥ一 厶、 いぐら 使っても いいなら …… 地 
球の 陸地 を 全部 買い占めて やろ ろかな、 土地 は資 
本 だとい ラ からね。 J 

花 子 「あきれ^。 そんな こと 不可能て しょ。 も 

う 少し 現実的な 話 をして よ o J 

太郎 「それじゃ まあ 曰 本 中の 土地て いいや。」 
花 子 「どっちに しろ、 てきつ こないて しょ。 第 

一 曰 本の 土地 は、 全部て 372.000to 2 も あるの よ。 

伋 りに 1m 2 当 だり 1 万円と して it 算 しても 3. 720. 

000 . 000 . 000 . 000 円に もなる わ」 
太郎 「そんなに Otf 並 ,3( ことになる わけ 1 ?」 
花 子 「三千 七 白 二十 兆 円。 1 万円 札に して、 1 
間に 10 枚す つ 数えても、 約 1,180 年 かかる ぉ循 

段な の。 あな だ、 数えて みる 7」 
太郎 「ヮ 一、 金 持になる の も 癸 じ やない よこれ 



じ や。 土地の 買い占め はよ した。 だけど、 0 ガす 
ら 一つと 並んだ ときの 読み方って いうの は、 兆 や 
京 まて じ やな いんだって 7」 

花 子 「曰 本の 数の 読み方 は、 インドから 中国 を 
通って 伝わつ だの を、 江戶 時代の 数学者 吉田 光由 
ガ ttM§5 という 本の 中て、 4 けだお きに 規則正し 
ぐ 整理して 発表し^の ガ 一番 有名よ。 それによ る 
と 10 7S という 大きな 数 まて 読む ことが てきる の」 

太郎 「京、 ほ、 ^ 那由他、 不可 SsIS …… 

全ぐ 不 qi 思議な 名前 だな あ。 千 大数なん ての は、 
いつ だい どのぐ らいの 数になる ん だい 1 ? j 

花 子 「宇宙に ある 原子の 数ガ 3 X10 74 というな 
ら、 ちょうど それに 相当す るぐ らいの 数よ。」 

太郎 「フー ン、 全然 想像つ かないのに 変わり は 
ない けれど スゴィ ね。」 

花 子 「インドの 古い 文献に よると 10 14C まて あら 
わす ことかて きる のよ。 ぉ枳 ii 様なん かか、 そん 




《 



E 十 a+=0.1!2x 1200 




匚匚 匚匚， 二 门ロ 匚. ロ匚匚 匚. 匚. ニ匚 二：], □ 门 ロ匚， 匚 0匚ロ[：. G 匚 □□. 



ん間ほ M 、'マ 0ぜゅ 二^い iM^^>f .1325E+01 si 

き閔 6 お 特にき J つ 倫 /二 ま'/ つ ？ #n (^^二 半 o あし で 謹 4 

さ ビキゥ J? さは .USE+nwm. 

f^、b'W 乙き 9 -枚つ ,^M^i^ —— f.18 E-O3)XC5^E-03)-m*m. 

i^mi^i^m m4 M Etl5t^ 

：* ゆ V き Ml t<m 

M 珅碟 i .511^+22^ 

^9tf .H?1Et58twv 



. 十樓 

. 千穰 

：: 溝 (こう) 

. 百 溝 

-千洚 

：: 潤 (<3ん) 

-十潤 

.白& 

キ澗 

：: 正 S ヒ 

-十正 

•KD 正 

. 千 正 

:.-©(*- い、 

. 十截 

-白載 

： ね 

：：極 (こ <> 

. 十 極 

-百極 

- -: 恒 SS! 沙ミ -25 し- i 

- 十恒沙 

-百 恒河沙 

-千 恒河沙 

.：-E; 瞎紙 £そ- つ さ 

-十 阿僧祇 

. 百 阿箧祇 

- 千阿懂 衹 

…- 那由他 

-十 那由他 

-百 那由他 

-千 那由他 

:-- 不可思議 so し 15 

-十 不可 思 

-百 不可 思 

-干 不可思^ 

：：無靈るりょさ 

：: 大数 £ い 92 

-十 大数 

-百 大数 

. 千 大数 



な 大きな 数 まて 使って、 いろいろと 哲学的な こと 
なんか を 考えて いるん てしょう ね J 

太郎 「小さい 数の 方 はどう 9」 

花 子 「小数のお 話 も、 やっぱりお 釈迦 様の 問答 
の 中に 出て ぐる わよ。 1 けた ごとに 全部 名前 ガっ 

いてる の。 それによ ると、 小数 以下 2 3 けた まて 
の 小さな 数 を 言い あらわす ことが qj 能ね」 

太郎 「これ もまた 奇妙な のガ 並ん てるけ ど、 塵 
とか 埃と か、 模糊、 刹那なん て、 想 じ 出て るね。」 

花 子 「水素 原子の 直径 は 約 1 オン クス卜 ロー^ 
とい ラ けど、 to 単位 だと 1 模糊 她、 cm 単位 だと 1 
沙 cm とい ラ ことになるの かしら。」 

太郎 つし つし …… ところて ポクら の コンビ ュ 
ータ は、 こういう 大きい 数 や 小さい 数 も 得意なん 
だろう ね。」 

花 子 「データの 表現 次第よ。 もちろん 無 暇て は 
ない けれどね。 たとえば 8 ビッ 卜と いつ だら、 8 



桁の 2 進数 だから 2 5 6 の 数が 表現て きる し、 4 
桁の 1 6 進数と いつたら、 65536 の数ガ 表現 
てぎ る ことになる。 j 

太郎 「2遒数に1 6 進数な j 

花 子 「いぐら コンピュータ でち 整数 や/」 \ 数 を そ 
のま ま 扱 うんじ やとても かなわない のよ。 そこて 
浮動小数点 方式と いって、 数の 有効数字 を 決めて 
それに 指数部 を 加え^ 表現 を 使 o ことによって、 
扱える 数の 範囲 を 広け ている わけなの よ。」 

太郎 「電卓て EXP 部の ついた の を 見た こと あ 
るけ ど、 あれ も その 指数 表現の； S めの ものだね。」 

花 子 「そうよ。 BAS I C て は 有効数字 8 桁と 
して、 0.27105055X10— 19 から 0.92233720X10 19 ま 
ての 数が 扱える わ。」 

太郎 「へ 一、 すいぶん よく 勉強して るんだ な あ。 
いぐらで ちお 金が 使える のちい いけれ ど、 せめて 
10 3 倍ぐ らい 頭 かよぐな り だい 気がする よ。」 




□□□□□□□□□□□□□□□□□□□□□□□ 
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プロ野球の ピッチャー ガ s し 数 表と いう もの を 使って いる 
の を 知っています か。 a 数 表に あるよ ラな 乱数 列と いう 
の は、 どの 数ち 発生す る 割合; tf 等しぐ、 さらに 数の 発生 
する 仕方に 規則 性の まつだ <な い （ラン タムと いいます） 
数の 列 をい います。 そのと きの 数 は 乱数と いわれます。 



0.1 ,2.3.4,5,6.7,8,9.0,1 .2,3.- 



この 数列 は どの 数 も 発生す る 割合 は 等しいて すね。 しか 
し、 発生の 仕方 ガラン タ厶 てはありません。 つまり、 乱 
数て はない のて す。 

0.1.1.1 .8,7.3.9.1 .6,1,2.1,1 .5. - 

この 数列て は 発生の 辻 方 はかなり ランタ 乙て すか、 1 の 
発生す る 割合が 非常に 大きぐな つてい ます。 てす から、 
これち 乱数と はいえ ません。 




あなた も a 数列 を 考えて みません か …… 。 意外とむ すかしい ことかお わかりて しょう。 てち 心配 はいり 

ません。 コンビ ュ一 タガ、 このき し 数 をつ ぐって ぐれます。 RND( ) を 用いれば よいの てす。 （ ） の 中 
に は あな だの 好きな 正の 整数 を 入れて ぐ ださい。 なんても よいの てす。 

10 FOR 1=1 TO 3 

20 PR I NT RND(2) ;: NEXT: END 

RUN 

0.38079483 0.75828109 0.44046507 
READY O _r 



S し 数 だから 結 梁 はこの ようにな ると はなぎり * せん。 



結果 をみ ると わかる と 思います ガ RND のとる 鐘に はつぎの 関係 かあります c 

0<RND (1) <1 
1 0 0 0 個の 乱数の 平 S をと つてみ ます。 



1 0 FOR J=1 TO 1 000 
20 R = RND (1) ： S = S + R 
30 NEXT J ： RG=S/1 000 
40 PR I NT RG 
50 END 
RUN 

0.4980582 
READY 

この、: PS をみ てみ ると、 0.5 に 非常に 近い 確と なって いますね。 この ことから も、 ここて 発生し だきし 
数 ガラン タ 乙て ある ことか わかります。 



サイコロ を 振って みて ください。 当然の ことて すガ、 1 から 
6 まての どれ かの 目ガ 出ます ね。 サイコロの もつ おもしろ さは 
どの 目 も 出る 割合 ガ 同じて あると いう ことて す。 つまり"！ から 
6 まての 目 ガラン タ厶に 発生す る わけてす。 
コンビ ユー タには 乱数 を 発生させる RND 関数が あります ガ 、• 
この 関数 を 用いて サイコロ を 作れない かとい うこと てす。 じつ 
はてき るの てす。 て はどラ する のて しょう。 ます は RND 関数 
を 6 倍して ください。 

x6 \ 

0<RND(1) < 1 i N 0<6xRND(1 )<6 

ここて I NT 命令 を 思い出して ください。 6xRND( 1 ) に 
I NT 命令 を 用いる のて す。 

I NT (6 • RND(1 )) =0， 1 , 2,3,4,5 

これて 0 から 5 まての ランタ^に 発生す る 整数 を 作る ことか 
てき^した。 サイコロ は 1 から 6 まてて すから、 まだ だめて す。 
さらに 1 をた せば よいと 思いつきました か。 

I NT (6 ■ RNDC1 )) +1=1, 2,3,4,5,6 




さあ、 サイコロ ガー 丁て き あかりて す。 さっそく この サイコ 
口 を 使って、 目の 出る 割合 を 調べて みません か。 



で M> は v 



1 o 
20 
30 
40 



PRINT "サイコロ 
I NPUT N 
FOR J=1 TO N 
R= I NT (6 • RNDC 1 + 1 



フル カイ スゥ " ； 



O.OOOOOOO 7 ^ ^ 
0. 9 ヨ 9 43999 ま ？' つ ^ 

'^^^^る^だ 1 よ. 



50 


1 F 


R= 


1 


THEN 


N1 


=N1 +1 


60 


1 F 


R = 


'？- 


THEN 


N2 


= N2+ 1 


70 


1 F 


R= 


3 


THEN 


N3 


= N3+1 


80 


1 F 


R = 


'- 


THEN 


N4 


= N4 + 1 


90 


1 F 


R= 


5 


THEN 


N5 


= N5+1 



1 00 IF R=6 THEN N6 = N6+1 
1 1 0 NEXT J 
1 20 P1 =N1 /N : P2 = N2/N : P3 = N3/N 
1 30 P4=N4/N : P5=N5/N : P6=N6/N 
140 PR I NT P1 , P2, P3, P4, P5, P6 
1 50 END 
RUN 

サイコロ ラ フ) し 力 イス ゥ 1 ? 5000 
0. 1 702 0. 1 654 0.1 628 
0.1 69 0.1 7 

READY 




0WO(3 




0. 1 626 



どうて す。 どの 目 も 出る 割合 は ほとんど 同じて しょう。 数学的に いえば、 どの 目 も 6 回 振って 1 回 だ 
けて る サイコロ ガ 理想的な わけて、 そうすれば 1 /6 つまり 0. 1 6 7 に 近い ほどい い 乱数 サイコロ 

といえるの てす。 



あな だの^!、 さい 弟、 妹 クン だち の だめに 算数の 先生 をつ 
くって あげましょう。 はじめに 1 から 9 まての 数の 足し 
算 とかけ 算の 練習から。 足し算の 練習 は …… 

10 A= I NT (RND C1 ) '9 + 1) 

20 B= I NT (RND (1 ) 1 9 + 1) 

30 PRINT" " ； A ： PR I NT" +" ； B 

40 PR I NT I NPUT C 

50 IF C=A+B THEN 80 

60 PR I NT " モウ イチ 卜 * 3 ク カン 力、、 ェテ" 

7 0 GOTO 30 

80 PR I NT "OK ！ ョフテ 、、キ マ シタ' ' ： GOTOI 0 

文 番号 1 0 と 2 0 て 乱数 を 使って 1 から 9 まての 2 つ 
の 数 を 変数 A と B に 代入し ます。 つぎに その 2 つの 数の 
足し算の 式 を 塞いて、 答え を 「9」 ときいて きます。 そ 
して 文 番号 5 0 て 答えが 正しし 、かどう か 判定す るの てす 
かけ 算の 練習 は 文 番号 3 0 と 5 0 の" + " 記号 を " * •• 
に 変えれば いいのて す。 

つぎは 1 から 9 9 まての 数て す。 文 番号 1 0 と 20 を 

10 A= I NT (RND (1 ) -99 + 1) 
20 B= I NT (RND (1 ) ， 99+1 ) 

とします。 たしかに これて よさそう てす。 ところ ガ 1 ケ 
夕の 数ガ出 てぐ ると 2 つの 数の ケタ ガ 合わな ぐなります 
ね。 （右 そこて ケタを 合わせる ように 細工し ます。 つ 
ま り ス 卜 1 」 ンク 処理 を 使って、 数 纏の ケタ数 を 調べ、 そ 
； R にした ガ つて 式 を 霞 < わけてす。 前の フロ クラ^に 更 
につぎ の 変更 を 追加 すれば 完成て す。 

25 A$ = STR$ (A) ： B$ = STR$ (B) 

30 PR I NT TAB (5-LEN (A$) ) ； A 

35 PR I NT " + " ； TAB (5-LEN (B$) ) ； B 

40 PR I NT I NPUT C 

文 番号 2 5 て 2 つの 数 をス卜 リンクに 直し、 文 番号 3 0 と 4 0 とて それぞれの 数 を、 その ケタ数 
に 合わせて 表示し ます。 TAB ( ) と LEN ( ) の 使い方に 注目して ください。 

♦ ♦ ♦ i'i t t 'f t ティ一 タイム ♦ * ♦ ****** t t t ♦ t f t * ' * 





1 00 


？' • a " ； 


勉強 を 中断して、 ティ--タイ ムに 


1 1 0 


9 "□" ： W= 1 


しましょう。 


1 20 


FOR X=1T〇7:FOR Y=1T〇5:F0R Z= 1T05 


弟 や 妹 フン だ 5 と、 乱数 模様 を 見 


1 30 


？ TAB ((X —" • 5) ; A$; : NEXT ： 9 : NEXT 


ながら ケーキ を 食べる のち ス テキ 


1 40 


A$=CHRS ( I NT (RNDC-1) - 223 + 33)) 


てす ね。 


1 50 


？ " □□□□□ "；. • NEXT ： ？ " DDDD •' ： W=W+ 1 




1 60 


I F W>4 THEN 1 1 0 




1 70 


GOTO 1 20 





〔も は タ 

右 のよ 




きし 数 を 用いる と 積分 を 行な ラ ことが てきます。 こ 
の 場合、 確率 を 用います が、 これ は モンテ カル □ 
法に よる 数值樓 分と いわれる ものて す。 
だ 円の 面樓 （定褸 分） を 求めて みまし ょラ。 簡単 

のた め 4 分の 1 の だ 円 を 考えます。 右の 囡て 斜線 
部分 は X 2 /4+Y 2 =1 の だ 円内 部て す。 いま 点 
線て つぐら れる 長方形に ランタ 乙に 矢 を 投げる こ 
とに します。 矢 を 数多ぐ 投げれば、 だ 円内 部に 当 
つた 回数と 矢 を 投げた 総 回数の 比 はだ 円の 面 損と 
長方形の 面樓の 比に 近づいて ゆぐ ことになります。 
投け 矢の i 殳を RND 関数に やっても らう ことにし 
ます。 だ 円の 面樓を 求める フ 口 クラ 乙 はつぎの よ 
ラ になります。 




10 PRINT ' 'ゃヲ ナケ つし カイ スゥ 八 

20 INPUT N 

30 PR I NT ' 'ケィ サン チュウ テ、、 ス" 

4 0 FOR J=1 TO N 

50 X = 2*RND(1): Y=RND(1) 

60 IF X=tX/4+ 丫ネ Y<=1 THEN N 

7 0 NEXT J 

8 0 S = 4 や （2 *NDZN) 

90 PR I NT "タ、、 ェン ノ メ ンセキ S=" 
1 00 END 

RUN 

V ラ ナケ つし カイ スゥ 1\ ？ 
マ 1 00 

ケィ サン チュウ テ、、 ス 
タ、、 ェン ノ メ ンセキ S= 6. 4 
READY 

RUN 

や ヲ ナケ、 、ル カイ スゥ 八 マ 
マ 1 000 
ケィ サン チュウ テ、、 ス 
夕、、 ェン ノ メ ンセキ S= 6. 336 
READY 

この だ 円の 実際の 面 樓は約 6. 28 てす。 矢 を 100 回 
投げ だとき、 6.4 てす からかな り 近い 纏に なって い 
ます。 回数 を 1000 とした ときには、 さらに 実際の 
面 損に 近ぐな つてい ます。 て だら めな 数 を 使って 
こうして 面樓を 求める なんてお もしろ いと 思い ま 
せんか。 しかも 数ガ てたら めなら て だら めな ほど、 
答 は 正確に なって 行ぐ のて す。 



こちら ラスベガス。 き;"! 楽と 一獲千金の 夢の るつ ほの 街。 ギゃン フル 好きの マイケル は スロ' 
て 遊ん ています。 10 セン 卜 硬 貢 を 入れて パー を ガチャ ンと 押します。 ガラ ガラと 回転して. 



三つの 窓 



(タイ や） とか 
ジャラ 出て きます。 

もし はす; nri ば 10 セン 卜 をな ぐし ます 



-K) とか 出て きて、 その 組み合わせに よって コイン ガジャ ラ 



さあ プ n クラ^ を 作って みまし ょラ c 




10 PR I NT "H" ： D = 0 ： H$= " 

20 DIM NS (5) , A (3) 

30 FOR X=1 TO 1 0 ： HS=HS+ " BB 

40 FOR X=1 TO 5: READ NS (X) ： NEXT 

50 PR I NT HS ； "□□□$= SBQQQS " 

60 PR I NT HS ； "DH " ： PR I NT SPC (38) ； 

7 0 INPUT 'ソ い一 ヲ ォス チカラ ハ 9" ； NN 

80 FOR 丫 = 0 TO NN ： RR = RND (1) ： NEXT 



NEXT X 
X 
： D 
'□" 

Y 



90 FOR 
1 00 PR 



TO 3 : A (X) = I NT (5 ■ RND (1) ) +1 : NEXT X 



1 1 0 
1 20 
1 30 
1 40 

1 50 

1 60 

1 7 0 

1 80 

1 90 



X=1 
NT " 

FOR X=1 TO 3: PR I NT N$ (A (X) ： 

IF A ( 1) OA C2) THEN 1 70 

IF A (2) OA (3) THEN 1 60 

IF A ( 1) =5 THEN PR I NT H$; "タ、 - 
S1 . 00 " : D = D+1 . 00 : GOTO 50 

PR I NT H$ ; " ミン ナオ ナシ、 、テ、 、ス！ $. 25 

:GOTO 50 

PR I NT H$;" ショウ キン l\ $.10 " 
： GOTO 50 

IF A ( 1) = 1 THEN PR I NT H$;" ショウ キン 

" : D=D+0. 05 ： GOTO 50 
PR I NT H$;" サ、、 ン ネン. モウ 1 0 セン 卜 卜、、 ゥソ 

： D = D - 0. 1 ： GOTO 50 
DATA 拳. +++. $SS 



NEXT •• PR I NT 



D = D+0.25 



D = D + 〇. 1 



S. 05 



うまぐ 行きました か。 え 9 コイン ガジャ ラジ ゃラ なんて ゥソ ばつな りって 7 まあ そこのと こ 

ろ は 。 マイケルと 同様 ギヤ ン フル 好きの きみ （9)、 もう ちょっと 凝って、 ； e とえば ス ロッド マ 

シンの 形な どち 作って みだぐな つたん じ やない かな ！ 



試して 欲しい こと ！ 

RNDC )GX ) の 中に 0 ま だは 負 
の 整数 を いれる と、 乱数 值は ある 一 
定の S しか 得られません。 これ は 初 
期 鎖 をセッ 卜して いるの てす。 



三角形の 面樓を 求める 練習問題 を RN D 関数に つ < つても らい ま しょ ラ。 ここて は RN D 関数が あなた 
の 先生て す。 乱数に よって 三角形の 辺 の備 をい ろい ろと 5 えて ぐれます から、 あな だは その 面 樓を計 » 
して S え^す。 RND は あな だのよ き パー ドナーて す。 



1 0 
20 
30 
40 
50 
60 
70 
80 
90 
1 00 
1 1 0 
1 20 
1 30 
1 4 0 
1 50 
1 60 

1 7 0 

1 8 0 
1 90 
200 
2 1 0 
220 
230 
24 0 
250 

26 0 

27 0 
280 
290 
300 
3 1 0 
320 
330 
340 
350 
360 



D I M A(3), し $(4) 
FOR J=1 TO 4 
READ L$(J) ： NEXT J 
FOR J=1 TO 3 
A(J)= I NTC20 - RNDC 1 
NEXT J 

IF A( 1 )> = A(2)+A(3) GOTO 
IF A(2)> = A( 1 )+A(3) GOTO 
IF A(3)> = A(1 )+A(2) GOTO 
W=(AC1)+A(2)+A(3))/2 
T=W ： FOR J=1 TO 3 
T=T -(W-A(J)) ： NEXT J 
SS = SQR(T) ： S= I NT(SS) 

S>=0. 5 THEN S=S+1 



^じ' や 三^?^/ まゆ ih> 
おな. も ラ- 回"^ 直い- 



9 



ss 

NT 
NT 
NT 
NT 
NT 
NT 
NT 
NT 
NT 
NT 
NT 
NT 
NT 
I NPUT 
I F Y=S 
I F Y<S 
PR I NT 
PR I NT 



PR 
PR 
PR 
PR 
PR 
PR 
PR 
PR 
PR 
PR 
PR 
PR 
PR 




ツキ、、 ノ サン カク ケィ ノ メ ンセキ ラ モ卜 メナ サイ" 
タタ、、 シ ショウ スゥ イカ 1\ シシ ヤコ、、 二 ユウ スルコ 卜'' 



TABC8) 

TAB(8): 

TABC7)' 

TABC6) 

TABC5) 

TABC3) 

TABC4) 

TABC3) 



' A " 

ゾ V 
•y 

• B ノ 



\ 



TABC1 5) ； L$(1); A(1 ) 
TAB( 1 5) ； L$(2) ； A(2) 
丁 AB( 1 5) ； L$(3) ； A(3) 

\C" 



し $(4) ； 



THEN PR I NT 
THEN PR I NT 

7T ォ キス キ、、 ル'' 

aa ； 



OK ！! " ： GOTO 40. 
チイ サスキ 、、ル " ： GOTO 320 



PR I NT TABC24) 
GOTO 270 

DATA ペン ノ ナカ、、 サ AB= 
DATA ヘン ノ ナカ、、 サ CA= 



SPC (25) ： PR I NT 



□ 



ノ ナカ、、 サ BC= 
サン カク ケィ ABC ノ メ ンセキ S 



1\ 



»5* -J シ 3 ウス ウイ！） A 




^めしに タイレ ク卜 モードて、 つぎの 命令 を § えて 下さい。 



SET フ9， 49 



CR 



どうて した 7 テレビ 画面の 右下 隅ガ 光って いる はす。 
そこて こんど は 



o 



Y 



0 



>79 



RESET 79,49 [ CR I 49 

点灯して いると ころ ガ 消えて しまい ましたね。 

実は SET, RE SET 命令 は、 右 囡 のようになる 一点 だけ 

を 光らせ だり、 消し； 2 りする 働 きを 持って いるの てす。 



0.0 




79.0 




SET X. 


Y 




RESET 


X. Y 


0,49 




79.49 



テレビ 画面 



前方 右下 隅に 点滅 物 を 発見 ！ 



テレビ 画面 はまつ 白け 



1 〇 


PR I NT "H " 




1 0 


PR I NT"H" 


20 


X=79 ： 丫 =49 




20 


FOR X=0 


30 


SET X, Y 


― 光る 


30 


FOR Y=0 


40 


RESET X， Y 


― 消える 


40 


SET X, Y 


50 


GOTO 30 




50 


NEXT Y, X 








60 


GOTO 1 0 




画面 大の 長方形 を軎 ぐた めに 



1 〇 


PR I NT "H" 




20 


FOR X=0 TO 


79 


30 


SET X， 〇 




40 


SET X. 49 




50 


NEXT X 




60 


FOR Y=0 TO 


49 


70 


SET 〇， Y 




80 


SET 79, Y 




90 


NEXT Y 




99 


GOTO 99 





斜めの 線 を «< ために 

10 PR I NT "H " 

20 PR I NT " ナナ メノ ナカ、、 サ'' 

30 INPUT Y 

40 X = SQR(Y'Y/2) < ~ 

50 FOR A=1 TO X 

60 SET A, 49 一 A 

7 0 NEXT A 

80 GOTO 80 

三、: P 方の 定理 を) ^用して ます 



ここて ちょっと 変わった こと をして みましょう。 

10 PR I NT "H" 

20 FOR Z=1 TO 99 

30 SET Z, Z 

40 NEXT Z 

50 GOTO 50 

そうなん てす。 実は X 方向て 8 0 以上、 Y 方向て 
5 0 以上に なったら 

X « ~ X — 80 

Y * ~ Y — 50 
ガ 自動的に 計算され るし ぐみ なんてす ね。 



\ の 




、 \^ 、 





引 »n だ 線の 順 は ®— (g>— ③ 



20 FOR X=0 TO 79 

30 SET X, Y 

40 RESET X, Y-1 

50 NEXT X 

60 Y=Y+ 1 

70 GOTO 20 

絨へ ひとつ だけ すれながら、 樸 ぺ線ガ 光って 走る 
のガ 見え だてしょう な、 時間 をて きる だけ 引き伸 
ばして 原理； tf わかる ようにした ものて す。 
本物の テレビの 場合、 このよ ラな線 約 5 0 0 本て 
1 枚の 画面が てき、 これ ガ 1 杪 間に 3 0 枚の 割て 
送られて きている のて す。 




ボール を 飛び はねさせ ると… 池に 小石 を 投げて みると- 



1 0 PR I NT "H" 

20 FOR X=0 TO 79 

30 SET X, 0 ： SET X， 49 

40 NEXT X 

50 FOR Y=0 TO 49 

60 SET 0, Y ： SET 79, Y 

70 NEXT Y 

80 X = 79 • RND(1 ) ： 丫 =49 • 

RND(1) 
90 A=1 ： B=1 
1 00 SET X, Y 
1 1 0 IF X<2 GOSUB 200 
1 20 IF X>78 GOSUB 200 
1 30 IF Y<2 GOSUB 250 
1 40 IF Y>4 8 GOSUB 250 
1 50 RESET X, Y 
1 60 X=X+A ： Y=Y+B ： GOTO 1 
200 A=-A ： MUS I C "~A0 " ： 

RETURN 
250 B=-B ： MUS I C " AO " ： 
RETURN 

どラ てす。 フロ クラ^の 流れ かっかめ ました か 7 
この フ 口 クラ^ は 3 つの ポ イン ドガあります。 ひ 
とつ は ボールの 出発点 を 乱数て 作り出す 文 番号 8 
0、 ふだつ 目 は ポー ルガ 四方の 壁に ふつかつ だか 
ど ラかを 調べる 文 番号 1 1 0〜1 40、 三つ 目 は 
壁に ふ' つかった とき 方向 K 換 する^め の 文 番号 2 
00 と 250。 



10 X=40 ： Y=25 
20 DEF FNY(Z) = SQR(R • R 
一 Z • Z) 

30 PR I NT "H" ： SET X. Y 

40 R=R+5 

50 FOR Z=〇 TO R 

60 T = FNY (Z) 

70 SET X + Z, Y+T 

80 SET X + Z. Y-T 

90 SET X — Z， Y+T 

1 00 SET X — Z, Y-T 

1 1 0 NEXT Z 

1 20 IF R<>25 THEN 40 
1 30 GOTO 1 30 



00 



^え. ぁリ み') の 
、や ポ' ほえ 《ラ プニ" よ. 



ン 



ィ まつ 7 テしビ '7 ラネ 
タリウ^ も ザつ？ 
おみが'？. 
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動物の 生態に 関する ひとつの モデル を、 コンビ ユー タの SET 命令 を 使った クラ フィックて 見て みる こ 
とに しましょう。 ここて は 動物の 生存競争の モデル を 取 り 上け てみ ます。 生態学に よって この モデル は 
微分方程式の 形て 示されて います ガ、 コンピュータ による 数値計算の 簡 串-な 例と しても 参考に なると 思 
います。 

ゥサ ギとキ ツネ 

動物の 世界て 言われる 弱肉強食の 関係と して ゥサ ギとキ ツネ を 例に 取り上げましょう。 そして キ ツネ は 
草食の ゥサギ を 常食と する ものと します。 

生態学の モデルに よると ゥサギ の 数 を X、 キ ツネの 数 を Y とすると、 それぞれの 個体の 数 は、 つぎの 微 
分 方程式に したがう 変化 をして いきます。 

-=AX-BXY ゥサギ の 数の 変化 

dt 

-^-=CXY-DY キ ツネの 数の 変化 

dt 

As B、. C、 D は 適当な 定数。 XY の 項 ガウ サ ギとキ ツネの 弱肉強食の 意味 を もっています。 ゥサギ の 
数の 変化 を 見て みます と、 もし キッ ネガい なかったら 第二 項 は ゼロと なり、 ネス 5 算 的に 繁殖して 行き 
ます ガ、 キ ツネが いると キ ツネの 数ち 増加し ゥサギ の 数の 増加 はお さえられる ことになります （第二 項）。 
キ ツネの 数の 変ィ 匕て は、 ゥサ ギガい なかったら 第一 項 は ゼロと なり、 キ ツネ は どんどん 死ん ていきます。 
ゥサ ギガい ると キ ツネの 数 は 第一 項の CXY の 値に しだ かって 増加して い <、 という 関係に なって いま 
す。 

この 微分方程式 を コンピュータて 数備 的に 見る ために、 「接線 法」 による 近似 を 採用し ます。 それ は 時間 
微分 dt を 有限な 微小 時間 DT て 近似す る ものて このと き dx、 dy を DX、 DY とすると、 この 微分方程式 
は 

DX = (AX-BXY)DT 
DY=(CXY — DY)DT 



と 代数方程式になります。 

つぎの ページに この 方法 を 用いだ フロ グラ^の 例 を 示し^す, 
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20 
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REM ゥサ キ、、 卜 キ ツネ く^ _ (=^1\/1は51も実行せす、 だ だフロ クラ 乙の 注轵を 示します。 

READ A, B, C. D， DT， T 丁， K 

DATA 4 . 2 , 1 , 3, 0. 0 1 . 2, 30 

FOR H=1 TO 20 ： HS=H$+ "D" ： NEXT H 

PR I NT " SnHDHnnCJMS E " : PR I NT " BBSaHHS " 

PR I NT TAB(4) ； " FOX " ； "ffl" ； H$ ； □□□ ； TABC22) ； " CK 

PR I NT TABC2 2) ； "CEUS" ： PR I NT TABC22) ； "■BUB" 

PR I NT TABC2 1) ； "RABB i T" 

PR I NT "fflH" ； H$ ; SPCC38) ： PR I NT SPCC38) ； "ffl" ； HS 

I NPUT " ゥサキ 、、ノ カス、、 R0= " ； X 

INPUT" キ ツネ ノ カス、、 F0= " ； Y 

FOR 1=1 TO K 

FOR T=0 TO TT/K STEP DT 
X = X+(A + X — B*X 氺 Y)*DT 
Y=Y+(C 氺 X 氺 Y — D 氺 Y) ネ DT 
NEXT T 

SET 4:+(X + 6), 4 t(8-Y) 
NEXT I 

INPUT" ツキ、、 へ ユキ マスカ？ YZN " ； Y$ 
PR I NT "D" ； SPCC38) ； " H " 



IF Y$= " Y " 
GOTO 27 0 



THEN 1 0.0 



さて RUN させて みましょう。 ゥサギ の 数、 キ ツネの 数 
の 初期値 をき いてき ますね。 だとえば R〇 = 5、 F0 = 
5 を キー入力 してみ てぐ ださい。 この 初期 纏から はじめ 
て、 時間と ともに 数が 変化して ゆぐ のが 見られます。 

きれいな 卵形の 囡 形が 描かれます。 さて、 囡 形の 意味 を 
考えて みましょう。 

O の 部分。 最初 キ ツネの 数ガ 少なし 、時 ゥサギ は どんどん 
増えて 行き、 キ ツネの 数 もす こしす つ 増えて 行きます。 

© の 部分。 キ ツネの 数が 増え ゥサギ の数ガ 頭う ちとな つ 
て 逆に 減り はじめます。 

©ゥ サギの 数が どんどん 減少して 行ぐ と、 キ ツネの 数 も 
減り はじめ、 急激に 減少して 行きます。 

こラ してち との 状態に ちどります。 ゥサギ の 数と キ ツネ 

の 数の 初期設定 を いろいろ 変えて みると いろいろな 大き 

さの 卵形の クラ フガ 得られます。 
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この フ 口 クラ^ は、 ター 卜 マス 大学教授て、 BAS I C の 開発 者て ある ケメ ニー、 カー ッ 著の 「ベー 
シック 入門」 (森 ロ繁ー 監訳 共立 出版） て 取り上げられ ている 問題に よってい ます。 同軎 および、 ケメ 
ニー、 ス ネル、 卜ンプ ソン 共著の 「新しい 数学」 (矢 野 健 太郎訳 共立 出版） に は、 多ぐ の 社会、 人文 
科学 領域ての 興味深い 数学的 問題 ガ提 示されて います。 



キーボードから データ 入力す る 命令の 新顔 を 

て 紹介し ます。 その S も 



ゲー^な どて 素早い 処理 を 実行す るのに びつ だ り 

のゃッ てす。 I N PUT 命令て は 最初 「7 j とき 



いてきて、 データ を 入れてから [_CR キー を^た 
いて はじめて 次へ 移ります ガ、 GET 命令て は 

♦ プロ クラムの 実行が GET 命令に あるとき、 
1 つの キー ガ柙 されて いだら、 その 1 文字 
分の データ を 変数に 代入し 先へ 進む c 

♦ も しどの キー も 押されて いないと 数 纏 変数 
なら 「0」 、 ス 卜 1 」 ンク 変数なら 「空」 ガ 
代入され、 先ぺ 進む。 




となって いるの てす。 

GET 命令 を 用いる とき は GET 命令の 前後 をぐ 
るぐ る 廻りな から、 データが キー入力され るの を 
待って いるよ ラな 使い方 ガ 多ぐな り ます。 

GET 命令 を 使って ゲー^ を やる 前に 簡単な 練習 をして みましょう。 GOTO 命令て ぐり 返し GET 命 
令 を 実行させます。 変数 Z に対して 1 から 9 まての 数値 をキ一 入力して みて <だ さい。 

1 0 GET Z 

20 PR I NT Z ； ： GOTO 1 〇 

キー を 押せば その キーの 数鐘ガ 表示され ます ガ、 押し S ままに すると、 次/? らは その 数 儀 は 入力され す 
〇 ガ 表示； 



さて GET 命令、 SET 命令 を 使って 「陣取り ゲー^」 を 
作って みる ことにしましょう。 フ 口 クラ 乙 は 右べ一 ジ。 2 
人て 遊 ふゲー 乙て す。 画面の 正方形の 枠内て 2 人ガ それ ぞ 
れ 左上と 右下から 出発して 下 囵 の キー 操作に よって 向き を 
変えながら 相手の 動き を 阻止させる ように 動かします。 相 
手 ガ行 きづ まつだら 勝ちて す。 

A サン （左上なら スター 卜） 
キ一 h El m s 

丄 T — — 
B サン （右下なら スター 卜） 

キ一 回 （3 囵 囵 

i T -» «- 



^だし、 相手 ガ キー を 押してい ると き は、 他の キ一 は 受けつ けられません。 交互に ボンと 押す 想 じて 
キー入力して < ださい。 



この フ 口 クラ 乙 はこれ まての 命令 を ふんだんに 使って いますの て. どラ つぐって あるの なの ぞいて みだ 

らいか; tf てしょう。 ただし この フ 口 クラムに は ほほ 1 3 キロ パイ 卜の プロ クラ 乙 エリア ガ必 要て す。 



1 0 CLR 

20 DIM Z (49, 49) 

30 PR I NT "H" ； TAB (26) ；" A サン' ヒタ、 、リウ ェ カラ'' 



" 1 2 3 4 " 

"シタ ゥェ ミキ、、 ヒタ、 、リ" 
"8サン'5キ*シタカラ " 
"6 7 8 9" 
"シタ ゥェ ミキ、、 ヒ タ、、 i I- 



35 PR I NT TAB (26) 
40 PR I NT TAB (26) 
45 PR I NT TAB (26) 
50 PR I NT TAB (26) 
55 PR I NT TAB (26) 
60 FOR A=0 TO 49 
70 SET A, 0 : Z (A, 0) =—1 
80 SET A. 49: Z (A, 49) = — 1 
90 NEXT A 
1 00 FOR A=1 TO 49 
1 1 0 SET 0, A: Z (0. A) =-1 
1 20 SET 49, A ： Z (49, A) — 1 
130 NEXT A 
1 40 X1=4: Y1 =4 ： D1=1 
1 50 X2=45 ： 丫 2=45 :D2=7 
1 60 GOSUB 200 ： IF M=1 GOTO 10 
1 70 GOSUB 300: IF M=1 GOTO 10 
1 80 GOTO 1 60 
200 GET X 




l N 


I F 


X= 


0 


THEN 


260 






220 


I F 


X = 


1 


THEN 


Y1 =Y1 +1 


:GOTO 


270 


230 


I F 


x= 


2 


THEN 


< 
li 

< 

1 


:G〇TO 


270 


240 


I F 


x= 


3 


THEN 


X1 =X1 +1 


:GOT〇 


270 


250 


I F 


x= 


4 


THEN 


X1 =X1 -1 


:GOT。 


270 



260 X=D1 : GOTO 220 

270 D1=X:IF Z (X1. Y1) = -1 THEN 400 

280 MUS I C'DAO " ： SET X1, Y1 ： Z (X1. YD 

290 RETURN 

300 GET X 



310 


I F 


X = 


0 


THEN 


360 






320 




X= 


6 


THEN 


丫 2=Y2+1 


： GOTO 


370 


330 


I F 


x= 


フ 


THEN 


丫 2= 丫 2_1 


: GOTO 


370 


340 




x= 


8 


THEN 


X2=X2+1 


: GOTO 


370 


350 


I F 


x= 


9 


THEN 


X2=X2 — 1 


： GOTO 


370 



360 X=D2 ： GOTO 320 

370 D2=X: I F Z (X2, 丫 2) = — 1 THEN 450 

380 MUS I C"A0 " ： SET X2, Y2 : Z (X2， Y2) =— 1 

390 RETURN 

400 PR I NT TAB (27) ；" B サン ノカチ ヲ、、 ス！" 

410 MUS I C "C3DEGnCEGnCCDEGnCEGnCC " ： M=1 : RETURN 

450 PR I NT TAB (27) ；'' A サン ノカチ テ、、 ス！" 

460 MUS I C"OG3 口 AUBCDESFGABncmn せ DOEnFnttFnG" =M=1 

470 RETURN 



フロ クラ 乙の 中に 時 It の 機能 を 持 だせる とお もしろ いも 

のて す。 デジ 夕ル 時計 や 世界 時計 だって プロ クラ^ 次第 ！ 
そんな 機能 を T I $ ガ果 だして <れ ます。 

あな だの 前に ある コンピュータに つぎのように キー入力 

して I CR I キー を 押してみ てぐ ださい。 

PR I NT T I S 
芑 とえば、 つぎの ような 表示; tf あらわれ ると 思います。 

001 234 

ス卜 リンク 変数 T I $ の 内容て ある この 6 ケタの 数字 は 

何 を 意味して いるの てしょう か 9 

実は、 つぎのように 時刻 を 表わして いるの てす。 

00 1234 O 00 時 12 分 34 秒 

時分 秒 




ひ «) 



だ だし、 あな だの 時 it とあって いるか どうか はわ か り ません。 その 理由 はとい ラと、 コンビ ユー タの 
霪源を 入れる と 同時に T I $ に は 0 0 時 0 0 分 0 0 抄ガ 自動的に セッ 卜される からてす。 
もう一 度、 T I $ を 表示 させて みて <だ さい。 前に やった ときと T I $ の 内容 ガちガ つてい る ことに 
気つ い; E と 思います。 そ o てす。 T I $ の 中の 6 ケタの 数字 は デジタル 時計の 文字盤と 全ぐ 同じよう 
に 刻々 とかわって 行 < の てす。 今 まての T I $ の 纏 は、 じつは 電源を入れた ときからの 経 週 時間 だつ 
^のて す。 



1 0 T I $= " 1 02634 " 
20 PR I NT T I $ 
30 END 
RUN 

1 02634 
READY 

文 番号 1 0 のよ ろに すると T I $ にあな たの 好きな 時刻 
ガセッ 卜されます 。ただし、 " "の 中 は 6 ケタの 数字 
に 限 り ます。 





0 

に 



A $ のよう な ふつうの ス卜 リンクとの 関係 をつ ぎの フロク #$ミ 
ラムて みて ください。 さ ^'小し 7 くれ 7^ん だよ 

1 0 AS= " 1 23456 " 

20 T I $=A$ 

30 PR I NT T I $ 

40 FOR T=1 TO 1 000 ： NEXT 

50 B$ = 丁 I $ 

60 PR I NT B$ 

7 0 END 



RUN 
123456 
1 23457 
READY 





簡犖な 世界 時計 をつ ぐって みました。 もちろん デジタル 時計て す。 あな だの 好きな 都市の 時刻 をお しえ 
て ぐれます。 さあ、 つぎの プロ クラ^ を RUN させて ぐ ださい。 ここても T I $ ガ時を 刻ん ている のて 
す。 ロンドンと 東京 は 9 時間 もち かってい るの てす ね。 こんど は、 あな だの 手て 他の 都市の 時刻 をお し 
えて ぐれる フロ クラム をつ ぐって みて はいか ガて すか。 



1 0 PRINT "H" 

20 DIM C$(1 0), D(1 0), E(1 0), TS(1 0) 

30 FOR 1=1 TO 1 0 ： READ CSC I). D( I) ： NEXT I 

40 PR I NT" 卜一 キヨ ゥ ノ シ、、 コク l\ V " 

50 INPUT T I S ： PR I NT "H" 

60 PR I NT "□" ： TSCD-T I $ 

70 FOR 1=1 TO 10 

80 E( I)=VAL(LEFT$(TS(1). 2)) + DC I ) 

85 IF EC I) = 24 THEN E(I) = 0 

90 IF EC I )<0 THEN E( I)=24 + E( I) 

1 00 T$( I )=STRS(E( I))+R I GHT$(T$(1 ), 4) 

1 1 0 IF LEN(T$( I)) = 5 THEN T$(I)="0"+T$ (I) 

1 20 PR I NT C$(I); TABC1 5) ； LEFT$(TS( I ), 2); 

1 30 PR I NT "時 "； M I D$(T$( I), 3， 2) ; " 分 "； 

1 40 PR I NT R I GHT$(T$( I), 2) ； "抄 " ： NEXT I 

1 50 GOTO 60 ： END 

1 60 DATA I ^一 キ ヨウ， 0, モスクワ， 一 6, U ズテ、 、シ、 、ャ ネィ □, ー1 2 
1 70 DATA シ 卜、、 ニー， 1 , ホノルル，一 1 9, ロン 卜、、 ン， 一 9, カイ □, ー7 
180 DATA ニューヨーク， 一 1 4， サンフランシスコ， 一 1 7, ハ。 リ，一 8 



-12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 -19 -18 -17 -16 -15 -14 -13 (時差） 
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§ II 
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リオ デジ や ネ\-ロ 



今回のお 話 は コンビ ユー タに S 楽 を 演奏させる TEMPO. MUS I C 命令に ついて てす。 
TEMPO 命令 は 文字 適り 速度 を 指定す る ものて す。 楽 W 上の 音符 は、 音の 高さ （半音、 オクターブ 
も 含む） と 音の R さに しだが つて、 ス卜 リンクに 薩し、 MUS I C 命令て 演奏し ます。 
1¥ しい 説明に 入る 前に TEMPO. MUS I C 命令の 偶成の 概略 を 示します。 




TEMPO X (X=1 7): 速度の 指定 



TEMPO X は 速さ を X て 指定す る 命令て す。 TEMPO 命令 ガ 無い 場合 は 
TEMP04 とみな して MUS I C 命令 を 実行し ます。 

30 TEMPO 1 最も 遅し、 （Lento. Adagio) 

30 TEMPO 4 中位の 速度 （Moderato) TEMP01 の 4 倍の 速さ 
30 TEMPO 7 最も 早し ヽ （Molto.Allegro, Presto) TEMP0 1 の 



7 倍の 速さ 




* なお CPU 草 板 _t の 68W2 の ポリ ユー^に よって、 TEMPO の 設定 も 変える ことなて き S す。 
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f 

16 辦苻 


7- 

付 点 16 分 休符 


y 1- 

8 分 休符 付 点 苻 


\ 


h 

点 4， 符 


2 分休苻 


付 点 2， 符 


全 休符 


お 

a 


•h 

16 分音苻 
1 


ぷ 

髓 さ 分 音符 
2 


》 J) 

8 分 音符 ほ 点 8 分 g 苻 
3 4 


J 

4 分 g 苻 
5 


J. 

付 点 4 分 § 苻 
6 


J 

2 分 音符 


J. 

は 点 2 分 S 符 
8 


o 

全音符 
9 



同じ 音 長の 音符； 9 続ぐ とき は、 2 番目の 音符から は 音 長の 指定 は 省略て きます。 はじめから 音 長が 指 
定 されない と 4 分 音符 （5 の 音 長） とみな して 実行し ます。 



MUS I C " ス卜 1 J ン ク、、 " ， M$ (ス卜 リンク、、 変数） 

ス卜 1 j ンク まだ はス ドリンク 変数て 指定され る 旋律 や 効 索 g を 実際に ス ビーカから 出す 命令て す。 そ 

の 速さ は 前に ある TEMPO 文て 指定され^ 速さに しだ かいます。 
旋律 や 効果音 を どのよ ラにス 卜 リンクに 墮す のかつ ぎに 示します。 

音符 は 音の ほさ （オクターブと 音名）、 それに 長さ （4 分 音符」 とか 8 分 音符》 とか） によって 指定 さ 
れ ます。 ォ クタ ーフの 指定、 音名の 指定、 音 長の 指定の 順に 説明し ます。 



音名の 指定 CDEFGAB せ F R 

音名の 指定 は CDE F GAB とせ 記号 を 使い 

ます。 

ドレ ミフ ァ …… と CDEF …… の 関係 は右囡 
に 示して あります。 半音の 指定 は シャープ 記 
号 # を 使います。 

休符 （つまり 無音） は R て 指定し ます。 




音 長の 指定 

高さの 指定され た 音の 長さ を 指定し ます。 32 分 音符から 全音符 まて を 0 から 9 まての 数字て 指定し ま 

す。 （休 につける と 休符の 長さになります） 



オクターブの 指定 ― ― 

コンピュータから 出す ことのて きる 音域 は、 
右に 示す よ うに 3 オクターブ てす。 
たとえば 黒点て 示し だ 音 は C の 音 （ハ長調の 
ド） てす ガ、 3 個はォ クタ ーフ 指定に よって 
区別され ます。 

低音 域の C 

中音 域の C 

S 音域の C 



(ft 囊 



ほ SteS 



無 指定 




音. 



—— B 

IA 

IG 

IF 



c C 

:l c L 



1 



音の 大きさ 

音の 大きさ を プロ クラ 乙に よって 変える こと はてき ません ガ、 音声 ボリュー^ ガ 本体の 後部に ありま 
す。 



楽譜 をス卜 リンクに 翻訳す る 練習 をい ぐつ かやって みまし よろ。 前 ページの 表 を蔘考 にして 下の 楽譜 
を 直して みます。 



P はじめに 八 長調、 ニ長調、 変ホ長 謂の 音階。 （4 分 音符て) 

ノ\ 長 頃 

八 長調 "CDEFGABnC" 



ニ長調 "DE*FGAB 门せ CnD" 

変ホ長調'' せ DFG せ G*AdCnDn*D 

4 分 音符と 8 分 音符て 卜 長調の 2 ォ ヮタ一 
フの 音階 を G$ に 代入し ます。 

G$= "□GUA3aBCDE±tFG5 

A3BncnDnEn±tFnG8 



二 長調 



変ホ長^ 



俨 」」」」「「「「 I け 1 'り」」」 び 



卜 長調 



R5 " 

— . ~ ' 

4 餅 符 



むぶ ぶ 川' 1 ^ 



付 点 2 分 音? 3 
の S い G の 音 



J 




ビ一 卜 ルスの GIRL の 冒頭の 部分 を GR$ に 代入して みましょう。 

G I RL (ジョン レノン、 ポール マッカ 一 卜 ニー） 

GR$= M nC3^D 



-i±D4， せ D1 门 せ D4 一せ D1 jfb'l, Pf ||: 厂 「 [J 「 •「 T'jj* 1 * ^ 



门 F4 门せ D1 门 D4 二 C1 
~C5G— 〇せ A 
せ G4HC1 B4HC1 
nD4HC1 B4 せ G1 

G7R5 " 



ま 



少し 複雑そう に 見えます ガ、 憤れて しまう と 

わけの ない ことなの てす。 

長し 、曲の 場合に は ス卜リ ンクの 長さ も 長ぐな 

つてき て、 テレビ 画面の 2 行 内の 命令文に お 
さめる ことが てきな ぐなる ことがあります。 
この場合、 曲 をい ぐつ かの ス卜 リンク 変数に 
入れて おいて、 ス卜 1 J ンク 変数の 和 をと つて 
MUS I C 命令の ス卜 リンク 変数と します。 



W TEMPO 5 

o music SR$ 
0 GOTO 1 0 



"(ilRL" の ほじ 'めり 戸 斤 を 

ィ 叮[| も- 緣リ 返します 




•hfSj 犖な オル コール を 作って みます。 この オル コールに は 二つの 小さな 曲 か 入って いて、 1 曲 は 明 

るい 棻 しい 気分、 もう 1 曲 は 悲しい 気分の 曲て す。 ス卜 リンク を 適当に 短 かく 区切って 使って いま 

す。 J か N を キー入力して < ださい。 



10 REM オルゴール （F. KROEPSCH ノ ェ チュー 卜、、 ヨリ） 
20 J1 $="C1 门 CnE^C— GnEnCHECAnD A 门 FDDAC1D " 
30 J2S= ''GB^BDAnGnttF 一 F，DB 一 C— E—CBGFD " 
40 J3$= "CUBCUGECGE 厂 C5R" 

50 N 1 $= " D_F_ADFAL_G[_ttADGAttA— A»CEG«AA 
GFnF 门 DAF " 

60 N2$= " DFA^D— F~AEG せ A「E— G— せ A 一 A— F— D _ E 

—せ CA— D せ GAEF せ C " 
7 0 N3$= " DLJDUFQADEF せ CDFA 口せ C「 
1 00 
1 1 0 
200 
2 1 〇 
220 
230 
240 
250 



NPUT "MAJOR OR 



IF MS= " N " 

TEMPO 4 

MUS I C J 1 $ 
GOTO 1 00 

TEMPO 4 

MUS I C N1 S 
GOTO 1 00 



THEN 



M I NOR? 
230 



(J, N) " ； M$ 



J2$;J1$;J2$;J3$ 



N2$ ； N1 $ ； N2S ； N3S 



エリス はね ぼす け。 あしだの 朝 こそ 早ぐ 起きて 森 
の 中 を ラン ニンクし ようと 思って いても、 起きる 
と、 もう 学校へ 行かなければ なりません。 
それ をェ I J スの 小さな 星の 王子 様に 話したら、 こ 
んな プロ クラム を 教えて ぐれ ま した。 

ェ 1 リス、 钥 7 時に 起きる ように タイマー を 

セッ 卜す るんだ よ。 ェ 1 J スの 好きな ショパン ガ鳴 
る ことだろう。 そしたら ぼぐ も そっと 森へ 降りて 
きみ を 待って いるよ。 




10 REM シ 3 八 ° ン ノ マス、'） レカ 

20 MM$= "A3 " ： M1 $= "A5Cll*C3nDnEn#FnGnttF0nGnitF4ClE3nDnttCB" 

30 M2$= " A3DD2R0nD1 nE2non#C3Bn#C7n#C3 " 

40 M3S= " A3D#C2R0n#C1 nD2D«CB3AnD7nD3 " 

1 00 PR I NT "0" : I NPUT " ケ、、 ンサ、 、ィ ノ シ、、 コクハ ？"; T I $ 

110 INPUT" タイ 7— ノ セッ ティ シ、、 コヮ八 

1 20 PR I NT "H" 

1 30 PRINT" EiaDDaD " ； TAB ( 1 7) ； T I $ 

1 40 IF VAL (LEFTS (T I S, 6) ) <>VAL (LEFTS (TM$. 6) ) THEN 1 30 
1 50 TMS= "9999 " 
1 60 TEMPO 3 

1 70 MUSIC MM$. M1 $, M2$, M1 $, M3$, M1 $, M2$, M1 $, M3$ 
1 80 GOTO 1 20 



最初の I N PUT 命令て 現在 時刻 を 入れます。 そう、 T I $ に 代入す る わけてす。 6 ケタの 数、 たとえば 



夜の 8 時ち ようど だつ だら 2000 00 として 時報の 瞬間に CR キー を 押 すん てしたね。 そしてつ ぎ 
に タイマ一 の 時刻 を キー入力 します。 たとえば エリスの 場合 は 0 7 0 0 0 0 とすれば いいのて す。 
少し 手 を 加えて、 ショパン のこの マス ルカ を 全部 入れて お < の もい いてし ようし、 時計 も デザインして 
みだら もっと 燊 しい タイマーが てきる はす。 世界の どこに もない ょラな タイマー を 持った 時 it を あなた 
の 机の 上に 置ぐ の も、 あなたの フ 口 クラ^の 腕し だいて す。 



角度 ガ 0 度から 180 度 まて 10 度 きざみに 変わる ときの SIN の 数 表と ク ラフの 歿形 てす。 



1 0 
20 
30 
40 
50 
60 
70 
80 
90 



PR I NT "HH " ； TAB (5) ； •• S I N " 

PR I NT 

FOR 1=0 TO 1 80 STEP 1 〇 
X= I ■ Tc/^Q0 
S = S I N (X) 
A= I NT ( 1 0 • S) 
PR I NT I ； TAB (4) 




PR I NT S ;TAB (1 8 + A) 
FOR J=0 TO A 
1 00 PR I NT " - " ； 
1 1 0 NEXT J 
1 20 PR I NT 
1 30 NEXT 1 
1 40 END 



RUN させて みて ぐ ださい。 この クラ フは 少し ラフて すか、 
ク ラフの 描き 方に ついては、 後て いろいろ 出て きます から、 
どうぞお 楽しみに ！ 



ああ fH""V4 つ》 
ラぬ: ラジタ ジ了"も 

つてく^ ぬ： L. 



左樣 かしから は * 

ぬ 二 7 ^ 180 玄 かけ 飞 

^る わい 



)0 



素数 を 求める プロ クラ^ を 作って みましょう。 素数と は、 1 以外の 自分より 小さい どんな 整数ても 割 
り 切れない 数の ことて す。 最初の 素数 は 2 てす から、 2 の 倍数、 つまり 2 より 大きい 偶数 はすべ て 素 
数て はありません ね。 そこて 添字つ き 変数 を 有効に 使ラ ために、 はじめから 偶数 を 除外して 考える こ 
とに します。 



1 〇 DIM I (255) 

20 FOR J=〇 TO 255 

30 I (J) =J - 2 + 3 ： NEXT J 

40 FOR K = 0 TO SQR (255) 

50 I F I (K) =0 THEN 90 

60 KK= K+ I (K) 

7 0 FOR L=KK TO 255 STEP I(K) 

80 I (し） =0 :NEXT し 

90 NEXT K 

1 0 0 PR ！ NT 2 ； 

1 1 0 FOR M=0 TO 255 

120 IF I (M) =0 THEN 1 40 

1 30 PR I NT I (M) ； 

1 40 NEXT M 

1 50 END 



添字つ き 変数 I ( ) の 中に 3 
なら 51 3 まての 256 個の 奇 
数 を 代入し ます。 



小さし 、方なら 集 数 を 見つけ 出し、 
その 倍数の 入って いる I ( ) 
の僩を 0 にします。 



はじめに、 唯一の 偶数の 秦数 
「2 j を 表示し、 次に I (〇） 
の鎖ガ 0 てない もの、 つまり 素 
数 を 表示し ます。 



少し 複雜な ブロ クラ^て すね。 特に、 素数の 倍数 を 除外し 
て 行ぐ ところに 注目して ぐ ださい。 



よぐ 名簿 を 作る ときな ど、 名前 を 分類す る こと; tf あります。 こんなと き 便利な フ ログ ラム を 知っている 
と 知らない のて は、 天国と 地獄の 差 はあり ますね。 

ここて は、 ス 卜 1 」 ンクを 分類す る 要領 を 勉強して、 最高に ス テキな 住所録 や 電話の メモ 帳 や 家計簿 を 作 
る だめの 足ガ かりにし ましょう。 



10 PRINT" フ、、 ンルィ スルノ 八 ナンニン テ、、 スカ" 
20 INPUT X 
30 DIM N$(X) 

40 PR I NT" ナ マエ ヲ 1 コス、 、ッ ィレテ クタ、、 サイ'' 
50 PRINT" タタ、、 シ 0 ナラ チュウ シ シ マス！'' 
60 FOR ' A=1 TO X 
7 0 PR I NT A ; ' 'ニン メ ラ 卜、、 ゥ ソ、、 " ； 
80 INPUT N$CA) 
90 IF NS(A)= " 0 " THEN 1 1 0 
NEXT A 
A = A-1 

FOR B=1 TO A — 1 
FOR C=1 TO A — B 



<!==； 氏名の キー入力 



1 00 
1 1 0 
1 20 
1 30 
1 40 
1 4 2 



1 44 
1 45 
1 46 
1 48 
1 50 
1 60 
1 7 0 
1 80 
1 90 
200 
21 0 
220 
230 



D=LEN(NSCO) ： E = LEN(NS(C+D) ： F=1 ： IF D<E THEN E = D 
X = ASC(M I D$(N$(C), F， 1 )) ： Y = ASCCM I D$(N$(C+1), F, 1)) 
: I F X>Y THEN 1 50 



1 80 
1 50 



I F X ぐ Y THEN 1 80 
I F (E = F) -(D=E) THEN 
I F (E = F) -(D>E) THEN 

F=F+1 ： GOTO 1 42 

K$ = N$(C) 

N$CC) = N$(C+1) 

NSCC+1 )=KS 

NEXT C， B 

PR I NT 

FOR B=1 TO A 
PR I NT NSCB) 
NEXT B 
END 



前後 を 入 rig える 




キ一 入力した 順の 名前 

TOM BROWN 
HAROLD GREEN 
J I M JONES 
ANNE M I LLER 
TOM CARTER 
EL ICE THOMAS 



分類した 結果 を 見る と 

ANNE M I LLER 
EL I CE THOMAS 
HAROLD GREEN 
J I M JONES 
TOM BROWN 
TOM CARTER 




コンピュータが あなたに ポー 力一 の カード を 配って ぐれます。 とに かぐ、 乱数 を 使って マジ メ （7) に 力 
ード をき つて ぐれる から、 ィ カサマの 心配はありません。 



1 〇 

20 

30 

40 

50 

60 

70 

80 

90 

1 00 

1 1 0 

1 20 

1 30 

1 40 

1 50 

1 60 

1 7 0 

1 80 

200 

2 1 〇 

220 

300 

3 1 0 

320 

330 

340 

350 

360 

370 

400 

4 1 〇 

420 

430 

440 

500 

51 0 

520 

530 

540 

550 

RUN 



DIM X (4, 1 3) 
C=0 

PR I NT ： FOR A=1 TO 5 
GOSUB 90 : PR I NT : NEXT A ： PR I NT 
PR I NT" アナ タ ノテ八 コレ テ、、 ィ' イカ" 
I NPUT " イイ ョ （1 ) ツキ、、 ラ フレ （2) 9 " 
ON A GOTO 400， 30 
GOTO 50 

C=C+1 ： I F C=51 THEN 500 
M= I NTC4 + RND(1))+1 
N= I NT(1 3*RNDC1))+1 
IF X(M, N) = — 1 THEN 1 00 
X(M. N) = -1 

IF N=1 THEN PR I NT "ACE ： " 
IF N=1 0 THEN PRINT N;" ： 
IF N ぐ 10 THEN PR I NT N ； M 

N— 10 GOTO 2 0 0. 21 0. 220 
M GOTO 300- 31 0. 320， 330 



A 



:GOTO 1 80 
； ： GOTO 1 80 
" ； rGOTO 1 80 



JACK 

QUEEN 

K I NG 
: GOTO 340 
: GOTO 340 
: GOTO 340 



:1 TO 
AS ； 



N 



ON 
ON 

PR I NT 
PR I NT 
PR I NT 
A$= 
A$= "V 
A$= 
A$= "* 
FOR B 
PR I NT 
NEXT B 
RETURN 
PR I NT 
PR I NT " ソ 
FOR M=1 
X(M, N) = 0 

NEXT N， M ： GOTO 20 
PR I NT 

PR I NT ' 'ノコ リ l\ 2 マイ タ、、 
I NPUT " 八ィ （ 1 ). ィ イエ （2) 9 
ON B GOTO 400， 550 
GOTO 51 0 
STOP 



GOTO 1 80 
GOTO 1 80 
GOTO 1 80 



r〇 



フタ キリ ナオ ス 3" 
4 ： FOR N=1 TO 




W ゃル カイ ！ 



； B 



プロ クラ^の ポ インド は… 

文 番号 1 0 0、 1 1 0 新し < カード をめ < つてい ると ころ 

文 番号 1 2 0 新し < めぐつ だ カード か 前に あつだ 

ものなら、 もうい 5 どやり 直す。 

文 番号 130 K つてし まった; 0 —ド に"一 1 "と 

しるし をつ けて おぐ 
-全 カード を 集めて、 カードの しるし 



文 番号 420 — 440- 



を" 0 " に 戻す。 
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save m 




SAVE "胸 £'MJ 

の ヤー 柳 v 



の あな^り あおきな き f、 



力ち., ほ- 7 。ムコ -タ" 

の i^<f 



ひ 



—二ん" し i ま"! 已^^ 



pj ラん | 二 7 バ ノレ あや' 7?'1^^" 
J U NAME り 舂^ はな レ). 



テ しビ耍 fe 彔厅、 



R£AC> 丫 



き 己 金 栗 了. ゲ 



p) FOUND**** 



- VER1FY^^#) に, 他 <9 7。 口 ケ' ラム 力' 虫 3 ヒき' 
表; T ，。フ アイ/レ^ホ "あれ は"^ を 木" ネと袅 ff、. 



C(S)F0l/ND NAME 



L DATA ERROR 
^ READY 



記錄に 間！]、 あ n 力、" お 

さらもう —ISAV£L おし 



VERIFY すべ t フ。 口 7" % を S つ (サ た ^ »7^Tx . 




£ 石 もに ^錢し Z i ほス' ヒ' うづ 
%^17^J 




'二り も れぱ、 ofr 



LOAD 




0； tOAD'MAME' gD 

pur 



d; ポ' ダン を 押す 

(4) FOUND 京 * 本ギ 

(5) FOUND WAME 

C£) L0APIN& NAME 

a) READr …-- "- 



フ 。口 フ" ラム を 力 ぉ'ソレ 亍―フ マ、 5 コニ t 。ユ-ち 
：： き は…？/"" ― 



ノ 



VERWY'OO)^) 、こ /1] し が '措^ 

/= も" レ. (幻, さ) は ioApi-^ni.^ 



--- コン t 。ュ- タに g あみ 出 し 中 
あみお し も了 
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フ 口 クラ 乙の 保存 かてき るなら、 データの 保存 も しだし 、もの … … 。 

そんな ひとは あと 5 個の 命令 を 覚える だけて 力 セッ卜 テープ を データの 倉庫と して 自由自在に あやつれ 
るよ ラ になります よ。 



WOPEN データ を 書き込む ための 準備 をし ます。 ひとまと まりの データに 名前 をつ ける の もこ 

の 命令の 役 S てす。 

PR I NT/T …… PR I NT と 同じ 使い方て、 力 セッ卜 テープに データ を窨き 込む 命令て す。 

ROPEN 反対に、 データ を 読み出す ための 準備 をし ます。 名前の ついだ データの か； 5 まりを 搜 

して ぐれる 命令て す。 

I NPUT/T …… I N PUT と 同じ 使い方て 力 セッ卜 テ一フ から デ一タ を 読み出す 命令て す。 

CLOSE WOPEN をし だら ROPEN する 前に、 また ROPEN をしたら WOPEN する 前 

に、 この 命令 を かなら す 実行して 下さい。 



て は、 てはじめに データ を 保存す る； 5 め、 1 から 99 まての 数字 を 力 セッ卜 テープに 書き込ん てみ ます。 
ここて 文 番号 10 の'' DATA "は、 これから 軎き 込む データの かたまりに つけだ 名前です から、 16 文字 
以内て あれば、 どんな 内容ても かまいません。 もちろん、 名前 をつ けな ぐても いいのて す。 



1 0 


WOPEN "DATA" 


20 


FOR X=1 TO 99 


30 


PR I NT/T X 


40 


NEXT X 


50 


CLOSE 


60 


END 


どラ てす。 


うまく « き 込み まし だか *? 



こんど はい ま 霞い G データ を 読み出す 墨て す。 ます、 
カセッ 卜 テープ を 巻き戻してから。 



1 0 ROPEN 

20 FOR X=1 TO 99 

30 I NPUT/T A 

40 PR I NT A 

50 NEXT X 

60 CLOSE 

70 END 




このと き 文 番号 20 て、 99 のか わりに 100 として、 もういち ど RUN してみ ません か …… こんど は エラ 
—になる はす。 なぜなら 100 個 目の データ は、 もともと 書き込ん ていな かつ だからて すね。 て も、 こん 
な こと はよ ぐ ある ことなの です。 書き込んだ データの 数なん て、 いちいち 覚えて はいられません。 そこ 
て 書き込み データの 終わりの 印と して、 およそ 関係の ない 数字、 S とえば、 一 99999999 など を軎 きそえ 
てお ぐ 方法が とられます。 



10 WOPEN "DATA" 

20 FOR X=1 TO 99 

30 PR I NT/T X 

40 NEXT X 

50 PR I NT/T 一 99999999 

60 CLOSE 

70 END 



1 0 ROPEN " DATA" 

20 FOR X=1 TO 200 
30 I NPUT/T A 

40 IF A=-99999999 THEN 7 0 

50 PR I NT A 

60 NEXT X 

70 CLOSE 

80 END 



データの 保存、 読み出し 命令 はス 卜 1 」 ンク 型の データに もも 5 ろん 使えます。 

ここて は 5 人の 作曲家の 名前 を 力 セッ卜 テープに 塞き 込み、 それ を 読み出す こと を やって みま しち。 



10 DIM N$ (5) 

20 N$ (1) = " BACH " 

30 N$ (2) = "MOZART •• 

40 N$ (3) =" BEETHOVEN " 

50 N$ (4) = "CHOP I N " 

60 N$ (5) =" BRAHMS " 

7 0 WOPEN "GREAT MUSICIANS" 

80 FOR J=1 TO 5 

90 PR I NT/T N$ (J) 

1 00 NEXT J 

1 1 0 CLOSE 

120 END 

数値 データの 書き込みと 同じて すね。 そして 読み出し は 

200 D I M M$ (5) 

2 1 0 ROPEN "GREAT MUSICIANS 

220 FOR K= 1 TO 5 

230 I NPUT/T M$ (K) 

240 PR I NT MS (K) 

250 NEXT K 

260 CLOSE 




これて 完了て す。 ところて 今の 場合 書き込み のとき 使つ S ス 卜り ンク 変数 N $( ) と、 読み出しの; C めの 
ス卜 リンク 変数 M$( ) は 名前 ガ 異なって います。 力 セッ卜 テープに は データと しての 纏 そのもの ガ収 
錄され るの て、 それ まて 代入され ていだ 変数の 名前と は 無関係になる からてす。 このため、 読み出す デ 
一 タかス 卜 1 J ンク なら ス卜' J ンク 変数て、 まだ 数備 データなら 数 鐘 変数て 読み だす 限り、 ブロ クラ 乙て 
自在に 変数 名 を 変えても かまわない わけてす。 

ここ まて わかつ だと ころて、 数值 データと ス卜 リンク データの 琵 じった データファイル を 作って みまし 
よう。 たとえば、 前の 作曲家の 59 年 を 一緒に 窨き 込ん てお ぐに は、 前の フロ クラ^に つぎの 変更 を 加え 
た 命令文 を 与えれば し M 、のて す。 



1 5 DIM D (5) , T (5) 

65 D (1) =1 750 ： D (2) =1 791 :D (3) =1 827 

6 7 D (4) =1849 ：□ (5) =1897 

90 PR I NT/T NS (J) , D (J) 



これによ つて 作成され る ファイル ガ、 ス卜 リンク デ一タ と数值 データ ガ 交互に 並んだ ものに なること は 
おわかりて すね。 てす からこの ファイルの 読み出し も それに 合わせな ぐて はなり ません。 文 番号 2 0 0、 
2 3 0、 2 4 0 は、 こんな ときには 



200 D I M M$C5). T(5) 

230 I NPUT/T M$(K)， T(K) 

240 PR I NT M$(K), T( K) 



とされな ぐて はなり ません。 もとの まま だと ス卜 リンク 変数 M$( ) へ 数値 データが 入ろうと して エラ 
一 を 生じる ごとになります.， 



ある クラスの 国語、 英語、 理科、 数学の 成績 を 力 セッ卜 テープに 記録して おぐ だめの フ 口 クラ 乙て す。 



10 INPUT "ナンニン デス 力 
20 DIM N$ (N) , K (N) ， 
30 DIM R (N), S (N) 
40 A$= " ノ テンス ゥ l\ " 
50 FOR X=1 TO N 
60 PR I NT ： PR I NT X ; " 
70 INPUT" ナ マエ ラ 卜、、 ゥ 
80 PR I NT" コクコ ゝ、" ； A$ ； 
90 PR I NT "エイコ、、 "； A$ ； 
1 00 PR I NT "リカ" ； A$ ； ： 
110 PR I NT "スゥ 力、、 ク'' ； A 
1 20 NEXT X 




1 30 WOPEN" セ イセ キ" 《 —— 「せ イセ キ 」 という 名前の データ 群 を 次なら 露 < だめ 

1 40 PR I NT/T N ワラスの 人数の 禹 きこみ 

150 FOR X=1 TO N 

160 PR I NT/T N$(X)， K (X) , E(X)， R(X)， S (X) < —— 点数の 塞き 込み 

1 70 NEXT X 

1 80 CLOSE ' —— S き 込みの 終了 

1 90 END 

それて は冓き 込んだ 成 纊デ一 タを 読み出して、 各人の 平 tS 点と 各 教科の、: P 均 点 を it 算 してみ ましよ ラ。 



1 〇 
20 
30 
40 
50 
60 
70 
80 
90 
1 00 
1 1 0 
1 20 
1 30 
1 40 
1 50 
1 60 
1 7 0 
1 80 
1 90 
200 
21 0 
220 
230 
240 
250 



ROPEN" セ イセ キ'' * 
INPU 丁/丁 N ' 
DIM N$ CN), K (N)， E (N) 
DIM R (N) ， S (N) 
FOR X=1 TO N 
I NPUT/T NS (X), K (X) 
I NPUT/T E (X) , R (X) , S (X) 
NEXT X 
CLOSE 
PR I NT 
PR I NT 
PR I NT 
PR I NT 
FOR X = 
PR I NT 
PR I NT 
PR I NT 
PR I NT 
PR I NT 
K (0) =K 



「セ イセ キ」 とい ラ 名前の データ 群を搜 すだめ 
クラスの 人数の 読み出し 



S 前と 国 IS の 点数の 読み出し 
英語、 理科、 数学の 点数の 统み 出し 



铳 み 出しの 終了 



TAB (10); "コフ コ、、 
TAB (15)； "エイコ、、 
TAB (20) ； "リカ" ； 
TAB (25) ； " スゥ 力、、 
1 TO N 

N$ (X) ； TAB (1 0) 



K (X) 



TAB (15)； 
TAB (20) ； 
TAB (25) ； 
TAB (30) ； 
(0) +K (X) 
R (0) =R (0) +R (X) 
NEXT X 

PR I NT TAB (10)； 
PR I NT TAB (20) ； 
END 



E (X) ； 
R (X) ； 
S (X) ； 
(K (X) 
： E (0) 
： S (0) 



+ E (X) +R (X) +S (X) ) /A 
=E (0) +E (X) 
=S (0) +S (X) 



K (0) /N 
R (0) /N 



TAB (1 5) 
TAB (25) 



E (0) /N 
S (0) /N 



MUS I C 命令の 頃て お話しした 「音 癸の ライフ ラ 
リー j を 作る のに この データファイル は 欠かせない 
ちの てす。 

楽曲の データと なる ちの は 具 1$ 的に はいろ いろな 記 
号の 集まり からなる ス卜 リンク デ 一夕て しだ。 楽曲 
ごとに この データの 集まりに 名前 を 付けて おけば、 
力 セッ卜 テープに 記録され だた ぐさん の 曲の 中から、 
名前 を 指定した 曲 だけ ビック アップす る こと ガ てき 
る ことになります。 

たとえば、 タイマーの オルゴールに 使う 曲 を この ラ 
ィフラ り 一の 中から と り 出して 変更し だり、 ゲ一 乙 
のブロ クラ^ や クラ フィ、 シヮブ 口 クラ 乙に 採用した 
り、 自由自在に 活用て きる ことうけ あい！ …… 



Moito Vivace 





一に. 一 


一 1 し, で 




6** 







な ― 



etc. 



ショパン 作曲 「小犬の ワルツ」 



91 ベ一 ジて 使った ク レブ シュの 練習曲 を データ ファ 
ィルに 靄き 込む に は 



300 WOPEN "レンシ ユウ キヨ ク'' 

310 PR I NT/T J 1 $, J2S. J 3$. N1 $, N2S. N3$ 
320 CLOSE 

とすれば いいのて す。 ここて 注意し なぐて はなら な いのは 書き込みの データの 文字 数 は 2 5 5 文字 以 
下て なぐて はならない ことて す。 しだが つて 

305 MA$ = J 1 $ + J2$ + J3$ ： MB$=KM S + N2S + N3S 
3 1 0 PR I NT/T MAS, MBS 

などと すると、 ス卜 リンク 変数 MA$, MB$ の 内容 は 2 5 5 文字 を 越えて しまい、 データの 書き込み 
は 不完全な ものと なって しまいます。 

曲の 長さ は 曲に よって 異なる ように、 ス卜 リンク テ一タ の 長さ も 曲に よって まちまちな はす。 そうし 
だ デ一タ を 読み出す 際に データ エラー を 起こさな いように、 一曲 一曲 終曲 を 示す データ を 最後に 塵い 
てお <の てす。 だとえば、 終曲 記号 を' '【園" と 決めて おけ ぱ、 どの一 曲 も 1 00 個 以内の ス卜 リンク 
データから 成って いると して 



500 ROPEN ' 'コィ ヌ ノ ワルツ'' 

510 FOR A=1 TO 1 00 

520 I NPUT/T M$ (A) 

530 IF MS (A) ="■：■" THEN 550 

540 NEXT A 

550 CLOSE 

とすれば、 「小犬の ワルツ」 かき ちんと 読み出されます。 





D/M A$CN) 



DIM B$,(N) 



'02 



L ータの 記憶力 はばつ ぐんな のて、 いろんな 項目 を 
ふぐ んだ名 薄 をつ ぐ るぐ らし 、訳 あ り^せん。 頃 目の 順序 を 
決めて おいて、 だとえば、 姓名一 年令 一生 年月日一 現住所 
一本 藉地 という 具合に データ を 記憶 させて おぐ のて す。 そ 
して データ かちょうど 銀行に だぐ わ えられる お金の ように 
たぐさん 集められ ると、 データ パンク、 つ ^り データの 銀 
行と 呼ばれる よ ラ になる わけてす。 

ただ、 ほんと ラの 銀行と ちがって、 データ パンクに なると 
検索 や 分類 ガブ □ クラ^ 次第て すぐにて きる ことて しょう。 
検索と いうの は、 知り^いと 思う 項目 を 指定して、 それに 
じだす ベての データ を 捜し だす ことて す。 だとえば 血液 
型 を 指定して、 同じ 血液型の ひと をす ベて 搜し だすよう な 
とき、 血液型に よって 「検索す る」 といい ます。 
また、 ある 項目に 注目して、 たとえば 名前の アイ ゥェォ 順 
に 並 ひ' かえると か、 年令の 小さい 順に 並び かえ だり する こ 
と を 「分類す る」 といい ます。 





ィ窜 利な モラ/ 一- 



る タき. 







D/M DS>m J 




以上の 内容 を 理解した ところて、 DAT A 命令に ス卜 リンクと して 各 データ か 記憶され ている 場合の 
プロ クラム を まとめて みました。 もちろん、 この プロ クラ 乙 例 を もとに、 1C 便 番号 や 住所 を 同時に 知 
る ことのて きる ような 変更 も 楽しい 勉強になる ことて しょう。 檍 する ことな < 挑戦して みたら、 きつ 
と 便利な データ/ \ ンク になる と 思い^す。 



1 〇 


N=1 2 






20 


D I M 


M$ CN) ― 


姓 


30 


D I M 


N$ (N) < ― 


名 


40 


D I M 


A$ (N) <— 


目 宅の ®SS の 市外 局番 


50 


D I M 


B$ (N) < ― 


自宅の 電話の 市内 局番 


60 


D I M 


C$ (N) < ― 


勤務先 ® 話の 市外 局番 


70 


D I M 


D$ (N) < ― 


勤務 先籩 話の 市内 局番 


80 


D I M 


F (N) 




90 


FOR 


K=1 TO N 



1 00 
1 1 0 
1 20 
1 30 
1 40 
1 50 
1 60 
1 70 
1 80 
1 90 
200 
2 1 0 
220 
230 
240 
250 
260 
270 
280 
290 
300 
3 1 0 
320 
330 
340 
350 
360 
370 
380 
390 
400 
4 1 0 
420 
430 
440 
450 
460 




O s データの 読み込み 



(X) =K <— 姓 を 使つ だ 埃 索 をす る 



READ M$ (K) , N$ (K) 
READ A$ (K) - B$ (K) 
READ C$ (K) ， D$ (K) 
NEXT K 
PR I NT: PR I NT: X = 0 
PR I NT" ナ マエ l\ ナン テ、、 ス 力"； 

INPUT X$ <~ 検索したい 人の 姓 を キー入力 する 

FOR K=1 TO N 

IF MS (K) =X$ THEN X = X+1 ： 
NEXT K 

IF X<>0 THEN 240 
PR I NT " 力、、 ィ卜 ゥシゃ 力、、 イマ セン！' 
PR I NT " モウ イチ 卜、、 卜、、 ゥソ、 ヽ" 
GOTO 140 
PR I NT ： PR I NT 
FOR K=1 TO X 
し =F (K) *— R 

PR I NT" セィ メイ l\ " ； M$ (L) 
PR I NT" シ、、 タク ノ テ、、 ンヮ： ' 
PR I NT" ("； AS (し） ； "） " ； 
PR I NT " キン ^サキ テ、、 ンヮ ： ' 
PR INT" ( " ； C$ (L) ； ") " ； 
NEXT K 

1 40 



j じ!! J の 人て = & 表示す る e めの = &の てす。 
； " " ； N$ (し） 

B$ (し） 

D$ (し） 



GOTO 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



DATA 
DATA 
END 



力 ワク、 ヽチ， ォサ 乙， 0 7 45, 33-1 0 1 7, 06. 881 -2063 
ナカ ニシ， カオル， 03, 901 -8366, 045, 533-1 1 85 
ォ 力、、 タ， ケン シ、、 ， 0422. 65-8 1 1 1 . 03. 761-0745 
ミス、、 タニ， タケ コ， 0 45， 490-2951 , 045, 637 — 5300 
タニ^ ラ， マス シ、 -, 03. 294-4045. 04 72, 44-2251 
ワク、、， コ ウジ、、， 03, 783-2544, 0429. 32-3024 
マ エタ、、， ノリオ， 0425. 28-4681, 06， 961-51 62 
カン チ， マサ ヒロ， 0582, 32-4695, 066， 34 1-6839 
ヤマタ、、， ヒロユキ， 044, 776 — 81 01, 044, 604 — 7705 
オオウチ， リュウ イチ， 06, 81 2-9230. 06, 621-1 221 
サイ 卜ゥ， ミツ ズ， 043, 567-8901 , 043, 231 -4567 
ッシ、 、タ. マサ ヒロ， 06, 901-1 023. 06， 591 -5221 



モー ルス 信号 は 1838 年 ァメ 1 J 力の 画家、 サ 5 ユエル - 
モース ガ考 えだし だものて、 いまて ち 大切な 通信手段 
の ひとって す。 

原理 は 簡単て す。 ある 一定の 周波数の 電波 を 出す B き 間 
と 出さな し \ 時間の 比率 を 定めて いる わけてす。 



長音 （ツー） 



短音 （卜 ン） ― 



休止 



(短音の 3 倍の 時間の 送信） 



(短音と 同じ 時間の 無音） 



この 3 つの 組み合わせて 必要な 符号 を 表現す る 約束 ガ 
モー ルス コード 表て す。 その 一部分 を 下の ほうに 示し 

ています のて、 机の 上て たとえば SOS と 打って みて 
< ださい。 

あんかし 、むす かしい つて マ … … コンピュータの キー 入 
力 だって、 使って いるう ちに 自然に 指ガ 動ぐ ようにな 
つた はす。 モー ルス 信号 もます 頭て はなぐ、 自然に 指 
ガ 動ぐ ようになる まて 練習ガ 肝心て すね。 
そこて つぎの ベー ジのフ □ クラ 乙 は モー ルス 信号 を 作 
り だして、 簡単に 練習て きる ようにし たもの てす。 文 
番号 2 0 から 文 番号 2 7 0 まて ガ A から Z まて、 文番 
号 2 9 0 から 文 番号 3 8 0 まてが 0 から 9 まての 信号 
をつ くりだす ための ス卜 1 リンクて す。 簡 串に 説明して 
みまし よ o。 




□A 5 ► 高 音域の A (ラ） の 音て 音 長 は 5 (モー ルス 信号の ツーに 当たります） 

□A2 »S 音域の A (ラ） の 音て 音 長 は 2 (モー ルス 信号の ドンに 当 だり ます） 



R2- 



> 音の なし 、部分て その 長さ. が 2 



D 

AB 
'- C 
-iD_ 
へ E 



ラ 3 
n w 
力 し 

タ M 
レ 0 



厶丁 ― 



丰 



7V 



ェ 



'セ 

[X 

ン 



<\ 

0 
き 7 

恥： 



f F 



"； P 



マ X 



ネ a 



ナ R 



1 



6 



H 丫丄 



7 71 



ゴ 



シ 



し 



7 



(つ 



3 



ャ 



ン 



H 



レ 



10 DIM A1 C1 00), M$(1 27) 

20 MS(65)= M nA2R2nA5 " 

30 M$(66)= M nA5R2nA2R2nA2R2nA2 " 

40 M$(67)= M nA5R2nA2R2nA5R2nA2 " 

50 MS(68)= "nA5R2nA2R2nA2 " 

60 M$(69)= "nA2 " 

7 0 MS(70)= "nA2R2DA2R2nA5R2nA2 " 

80 MS(7 1 )= "□A5R2nA5R2nA2 " 

90 MS(72)= M nA2R2nA2R2nA2R2nA2 " 
1 00 M$(73)= "nA2R2nA2 " 



1 1 0 M$(74)= 
1 20 M$(75)= 
1 30 M$(76)= 
1 40 M$(77)= 
1 50 M$(78)= 
1 60 M$(79)= 
1 70 M$(80)= 
1 80 M$C81)= 
1 90 M$(82)= 
200 M$(83)= 
2 1 0 M$(84)= 
220 MS(85)= 
230 M$(86)= 
240 M$(87)= 
250 M$<88)= 
260 M$(89)= 
270 M$(90)= 
280 REM NO 
290 M$(48)= 
300 M$(49)= 
31 0 MS(50)= 
320 M$(51)= 
330 M$(52)= 
340 M$C53)= 
350 M$(54)= 
360 M$(55)= 
370 M$(56)= 
380 M$(57)= 
390 REM"SPACE " 
400 M$C32)= " R5 " 

1 000 INPUT ' 'コー 卜、、 ノ\ 卜、 ヽゥシ マス 力 
1010 FOR J =1 TO LEN(AS) 
1 020 A1(J)=ASC(M I D$(A$, J, D) 
1 030 NEXT J 

1 040 FOR J =1 TO LEN(A$) 
1 050 MUSIC M$(A1(J))， " R5 " 
1 060 NEXT J 
1070 GOTO 1 000 



'nA2R2nA5R2nA5R2nA5 " 
nA5R2nA2R2nA5 " 
'□A2R2nA5R2DA2R2nA2 " 
'□A5R2DA5 " 
'□A5R2DA2 " 
'□A5R2nA5R2nA5 " 
'□A2R2nA5R2nA5R2nA2 " 
■nA5R2nA5R2nA2R2nA5 " 
'□A2R2nA5R2nA2 " 
nA2R2nA2R2DA2 " 
□A5 " 

□A2R2nA2R2nA5 " 
□A2R2nA2R2nA2R2nA5 " 
□A2R2nA5R2nA5 " 
□A5R2nA2R2nA2R2nA5 " 
nA5R2DA2R2nA5R2nA5 " 
nA5R2nA5R2nA2R2nA2 " 

□A5R2nA5R2DA5R2nA5R2nA5 " 
nA2R2nA5R2DA5R2nA5R2nA5 " 
nA2R2nA2R2nA5R2nA5R2nA5 " 
nA2R2nA2R2nA2R2nA5R2nA5 " 

nA2R2DA2R2nA2R2nA2R2nA2 " 
□A5R2nA2R2nA2R2nA2R2nA2 " 
□A5R2nA5R2nA2R2nA2R2nA2 " 
nA5R2nA5R2nA5R2DA2R2nA2 " 
□A5R2nA5R2nA5R2nA5R2nA2 " 



マ " ； A$ 



•4 '/一' y 一 



^'0 




あな e はァゾ レフ アベ ッ 卜の A~Z、 数字の 0~ 9 を キー入力 してぐ ださい。 
例えば、 I LOVE YOU と キー入力 すれば それに ffiS じた モー ルス 信号 ガ 作り だされます。 モー ルス 信号て、 
あなたの 彼女に 愛の 告白 を ！ ！ 
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BAS I C 入門の 終わりに 「万年 暦」 の プログラ^ を 置 < ことにしました。 詳しい 説明 は 要らない と 思 
います。 私たちの 「時」 は 果てしなぐ 続いて 行きます。 



； MT 



5 DIM M$(1 2). W$(7) 

10 FOR 1=1 TO 1 2 ： READ MS(I): NEXT I 
20 FOR 1=1 TO 7 ： READ WS(I) ： NEXT I 
30 INPUT "年 ラ 卜、、 ゥソ、 、 9 "；丫 ： I NPUT " 月 ヲ 卜、、 ゥ ソヽ、 9 
40 H=MT ： GOSUB 4〇〇：K2=YB+1 
50 H=MT+1 ： GOSUB 400 ： K 1 =YB+1 
60 I =K1 -K2 ： I F l>=0 THEN L=28+ I ： GOTO 70 
65 し =35+1 

70 IF MT=12 THEN し =31 
75 PR I NT "H" ： GOSUB 1 90 
80 PR I NT TAB(8); 丫；" " ： M$(MT) : T = 4 
90 FOR 1=1 TO 7 ： PR I NT TAB(T) ; W$( I ) ： : T = T + 4 
: NEXT I ： PR I NT 
T=0 ： I F K2=0 THEN 1 20 

FOR 1=1 TO K2 ： PR I NT TAB(T) ; : T = T + 4 : NEXT I : T = T — 4 
FOR 1=1 TO L: I $ = STR$( I ) ： J = LEN( I S) 
PR I NT TABCT + 5-J) ： I $ ; ： T = T + 4 
IF T = 28 THEN T =〇 ： PR I NT 
NEXT I 

IF TOO THEN PR I NT 
GOSUB 1 90 
PR I NT "D" : GOTO 30 

FOR Z=1 TO 31 ： PR I NT " * " ； ： NEXT 
DATA JAN, FEB. MAR. APR. MAY. JUN 
JUL, AUG. SEP. OCT. NOV. DEC 
曰， 月， 火， 水. 木， 金. 土 



1 00 
1 1 0 
1 20 
1 30 
1 40 
1 50 
1 60 
1 70 
1 80 
1 90 
200 
21 0 
220 
230 
400 
4 1 0 
420 
430 
440 
450 
460 
470 
480 
490 
500 
51 0 
600 
61 0 
620 
630 
640 



PR I NT ： RETURN 



DATA 
DATA 
END 
X=Y 

I =H— 3 : J=1 2 : GOSUB 600 ： MM 

I F MM>9 THEN X = X— 1 

I =X : J=4〇0 : GOSUB 600 ： X=Z 

X4 = I NTCX/4) ： X1 = I NTCX/1 00) 

KY=X+X4-X1 

I =MM ： J=5 ： GOSUB 600 ： MZ=Z 
M5= I NTCMM/5) ： M2= I NTCMZ/2) 

I =MZ : J = 2 : GOSUB 600 ： P=Z 
KM=1 3*M5+5*M2+3*P 

I =KY+KM+3 ： J=7 ： GOSUB 600 
RETURN _ 
REM Z=I， J I 
K= I NT(I /J) 
Z=I-K*J 

IF Z<0 THEN Z=Z+J 
RETURN 



=z 




YB = : 



1 06 




あな だが、 天文学と か 人工衛星 など、 宇宙に 興味 かお ありて しだら、 コンピュータ を 使って、 いろいろ 
と 計算 をしたり S 表 を 作つ だ り してみ てはい かかて しょう。 ここて は、 そのために 必要な 代表的な 計算 
式 や 数値 を 示します。 

宇宙ての 物体の 動き は、 地上と は 違って 空気抵抗 などに よる 複雑さ もな ぐ、 数学的 計算と よぐ 一致す る 
はすて す。 だ だし、 より 正確な 値と なると、 他の 天体に よる 影響 や、 地球の 形状の ひすみ による 摂動、 

希薄と はいえ 宇宙に 存在す る ガス 圧 まて 考慮に 入れ だものて なくて はなり ません。 たとえば、 高度 800 
km の 宇宙て は 10- 9mmHg の 空気が あるし、 約 36. 000km の S 度に ある 静止衛星 は、 他の 天体の 影響に より 
軌道 傾斜角 ガ 1 年に 約 1 度 変わって しまいます。 



円軌道 を 描いて 運動す る 衛星の 速度 •' v = 




に .i せ 碑 チ後 
I 雕ぁ 



だ 円軌道 を 描いて 運動す る 衛星の 速度 ： 



mm 





^ a- 








、やダ 


キ 


^^ず ヽ 
o 外し 


个 






辦， 


[ 








< u 


> 



短 半径 
離心率 



'G • M 
r 



〔m,s〕 
Cs〕 

〔ぬ〕 

蜀星 まての 距離 〔m〕 

〔m/s〕 



T ーゥ / ド 

T 一 ど "7 G • M 

G=6. 67X10-H 

万有引力 定数 
M ： 地球の 質 置 



"=ト .d 



=2 



33 



G • M 

hi+h 2 +2R 



2 



り= ゾ a 2 — (a -e) 2 



e=OF/OP=/a£r^± 



r D =a( 1 一 e) 
r a =aC1 +e) 



〔s〕 
〔m〕 
〔m〕 



〔m〕 
〔m〕 





質 置 (太 曙 を 1 とする） 赤道 半 S 


離 心 » | 太曬 からの 平均 距離 （a) 


太 陽 


1 .000 


69 6000km 






水 星 


0.1 66x1 0 - e 


2440 


0.20563 I 0.5791 0x1 OSfcm 


金 星 


2.448x1 0-6 


6056 


0.00678 


1 .0821 0 " 


地 球 


30.034x1 0 -' 


6378 0.01 672 


1 .49600 " 


火 星 


3.22 7X1 0 - 7 


3390 


0.09338 


2.27944 " 


木 瞿 95.479x1 0 - 5 


7 1400 


0.04829 


7.7834 ' 


土 星 


2.856x1 0 - 4 


6 0400 


0.05604 


14.2700 ' 


天王星 


4.373X1 0-5 


2 3 7 00 


0.0461 3 


28.71 03 » 


海王瞿 


5.1 78x1 0 - 5 


2 5110 


0 . 0 '， 0 〇 4 


44.971 " 


冥王星 


0.552x1 0-6 


3400 


0.24842 


59.1 36 " 


月 


3.694x1 0 - s 


1 738 


0.0549* 


38 44 00Km* 



太陽の 資靈= 1.991 x1 0 3 °ko * KB 球に 対する B 理科 年表より 
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直接 実行 命令 



LOAD 



SAVE 



VER I FY 



CLR 



RUN 



ST 



ST/P 



NEW 



CONT 



BYE 



LOAD 



「ファイル 名 
LOAD "NAME" 



機械語 ファイル S 
LOAD "NAME OBJ " 



SAVE 

*~ ファイル S 
SAVE "NAME" 



VER I FY 



VER I FY 



「ファイル 名 
" NAME " 



CLR 

1 0 CLR 

RUN 

RUN 1 00 



し I ST 

し I ST 70 
し I ST 70 — 
LIST 70-1 00 

L I ST -1 00 

L I ST/P 

NEW 
CONT 



巳 YE 



カセッ 卜テ一 フフ アイ) し 中の BAS I C プロ クラ 
Z_s を 読み込みます。 この場合、 最初に 見つな つた 
プロ クラ^ を 読み込む ことになります。 
" NAME " とい ラファイ ル S のつ いだ BAS I C 
フロ クラ^ を 読み込み^す。 

銃み 込むべき ファイル； y 機械語 ファイルて あつだ 

場合、 その ローデ インク アドレス か、 LIMIT 
命令て 限定した BAS I C ェ 1 」ァ 以降の 機 概語フ 
□ クラ^ェ ソァ 内て あれば、 そこへ □ 一 ディン ク 
を 行います。 （このと き BAS I C テキス 卜 エリア 
は NEW されません。） 

現在、 コンビ ユー タ内 にある フ 口 クラム を カセッ 
卜 テープに 記憶 させます。 
上 SS と 同様に プロ クラ^ を " NAME " とい ラフ 
アイ ル名 をつ けて 記憶させます。 

現在、 コンピュータ 内に ある フロ クラ 乙と カセッ 
卜 テープ ファイル 中の BAS I C フ 口 クラ^と 比 
15 します。 

上記と 同様に、 コンビ ユー タ 内の プロ クラ^と、 
" NAME " という ファイル 名のつ いた フ0 クラ 
^を 比 扱し ます。 

数値 をと る 変数 はすべ て 0、 ス卜 リンク 変数 もす 
ベて 空に します。 

フ0 クラム を 実行し ます。 
プロ クラ^ を文番 0 0 から 実行し ます。 
(RUN て は その 薩後、 すべての 変数 を 0 まだ は 
空に します） 

現在、 コンビ ユー タ にある プロ クラ^の すべて を 

テレビ 画面に 表示し ます。 

文 番号 7 0 の フロ クラ^だ け を 表示し ます。 

文 番号 7 0 以降の フロ クラ 厶を すべて 表示し ます。 

文 番号 7 0 から 文 番号 1 0 0 まての プロ クラ^ を 

表示します。 

艾 番号 1 0 0 まての フロ クラム を 表示し ます。 

上記の し I ST と ほとんど 同じ 機能 を フリン ター 
に対して 行ないます。 

現在、 コンピュータ 内に ある プロ クラ^ を 消去し 
ます。 

フロ クラムの 実行 ガス 卜ッフ （BREAK キーに 
よって、 あるいは プロ クラ^ 中の STOP 命令、 
END 命令に よって） さ r!G 際に は、 その ス卜ッ 
プし E 所から 実行 を 再開す る ことが てきます。 
(ス 卜ッフ しだ あとて、 艾 番号 を 使つ; £フロ クラ 
^の纖 集 をし だら、 CONT は使ラ こと ガて きま 
せん。 直接 実行 命令 は 使って ちかまい 5 せん） 

BAS I C の 使用 を やめて、 モニターに 戻ります。 
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ステー 

GOTO 

GOSUB 

RETURN 



ON- GOTO 



ON- GOSUB 



•THEN 



GOTO 



GOSUB 



FOR... NEXT 
STEP 



READ DATA 



1 00 GOTO 200 
1 00 GOSUB 700 
800 RETURN 

1 0 ON A GOTO 70.80. 90 



1 00 ON A GOSUB 700 . 800 



10 IF A>20 THEN 1 00 



30 IF B<3 THEN B=B+3 



1 00 IF A>=B GOTO 1 0 



1 00 IF A=B- 2 GOSUB 700 



10 FOR A=1 TO 10 
20 PR I NT A 
30 NEXT A 



1 0 FOR B=2 TO 8 STEP 3 
20 PR I NT BT 2 
30 NEXT 



1 0 FOR A=1 TO 3 — 

20 FOR B=1 0 TO 30 

30 PR I NT A ， B 

40 NEXT B 

50 NEXT A 



メレ 



文 番号 2 0 0 へ ジャンプ します。 

艾 番号 7 00 の サフ' し一 チンへ 分岐し * す。 

サ フルー チンの 実行 を 終了し、 メイン フ □ クラ 乙 
て GOSUB 命令 をした 次の ステー 卜メン 卜へ 戻 
ります。 

変数 A の 纏； ^1 なら 文 番号 7 0 へ、 2 なら 文 番号 
8 0 へ、 3 なら 文 番号 9 0 へジ ゃンフ します。 A 
； yo ま C は 4 以上なら 次の 文 を 実行し ます。 ON 
に は I NT が 含ま 《 ており A か 2.7 ならば 2 の 
場合と 同様に 文 番号 8 0 へジ ヤン フ します。 

変数 A の備ガ 1 なら 文 番号 7 0 0、 2 なら 文 番号 
8 0 0 のサ フルー チンへ 分岐し 5 す。 A ガ 
は 3 以上なら 次の 文 を 実行し ます。 

変数 A の值ガ 2 0 よ り 大 なら、 文 番号 100 へジ 
ヤン フし ます。 A ガ 20 以下なら 次の 文 を 実行し 
ます。 

変数 B の值ガ 3 より 小なら 変数 B に B+3 の值を 
代入し ます。 B ガ 3 以 1: なら 次の 文 を 実行し ま 9。 

変数 A の鎖ガ 変数 B の 儀 以上なら 艾 番号 1 0 へジ 
ヤン プ します。 A ガ B よ り 小なら 次の 文 を 実行し 
ます。 

変数 A の e ガ 変数 B の值の 2 倍に 等しいなら 文番 
号 7 0 0 のサ フルー チンへ 分岐し ます。 等しくな 
いなら 次の 文 を 実行し ます。 

(条件文の あとに マルチ ステ ー卜メ ン卜ガ 来る 場 
合、 ON 文 は 条件 ガ 成り立 だない とき 実行され 
ます づ、 I F 文 は 条件 か 成り立 だない とき 次の 
艾 番号へ 移 り マルチ ステー 卜 メン卜 は 無視され 
ます。） 

文 番号 1 0 は 変数 A を 1 から 1 0 まて 変 < 匕 させよ 
とい ラ 命令て、 最初 A の礦は 1 とな り ます。 文番 
号 2 0 は A の值を テレビ 画面に 表示させる 命令て 
すなら 数備 1 ガ表 示さ; n ます。 次に 文 番号 30 て 
A の體は 2 になって この ルーフ を 作り返します。 
こうして A の値ガ 1 0 になる まて この ルーフ ガ^ 
り 返されます。 （ルーフ を 終了し だ 時点て A に は 11 
の S か 入って います。） 

艾 番号 1 0 は 変数 B を 2 なら 8 まて、 3 すつ 大き 
ぐして 変化 させよ といろ 命令て す。 STEP の 値 
を 負に して 変数 CDfi を/」 、さぐして 行ぐ こと もてき 
ます。 

変数 A と B について FOR …… NEXT ルーフ を 
靈 ねだ 例て す。 B ルーフ は A ループの 内 ffi に罾か 
れ ている ところに 注目して 下さい。 ルーフ は 2 重 
3 重 …… と霪 ねる ことかて きます ガ、 内側の ルー 
フは！ ^す 外 <則 の J レーフ 内に 閉じて し 、な < て はな り 
ません。 

DAT A 文に ■ な; n だ 定数 まだ はス卜 リンク を R 
E A D 文の 中に 示され だ 変数に < え 入す る 命令て す。 
READ 文中の 変数と、 そ ri に 対 する DATA 
文中の 髓は、 数 S 変数なら 数 倒、 ス卜 り ンク 変数 
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Fi 巳 S 丁 OF (巳 



MUS I C 
TEMPO 



DEF FN 



SET 
RESET 



WOPEN 



1 0 READ 

20 DATA 

30 DATA 

40 DATA 



HS . H . SS . S . DS . D 

/、一卜 ， 3 

スへ。 ード ，io 

タ、、 ィゃ ， 6 



1 0 READ A . B . C 

20 RESTORE 

30 READ D . E 

40 DATA 3.6.9.12.15 



300 TEMPO フ 

310 MUSIC " DE#FGA" 



300 M1 $="C3EGnC" 

31 0 M2S=" B3GDDG" 

320 M3S="C8R5" 

330 MUS I C M1 $ . M2S .M3$ 



1 00 DEF 
1 1 0 DEF 
1 20 DEF 



FNA (X) =X T 2-X 
FNB (X) =LOG (X) 
FNZ (Y) =LN (Y) 



SET X.Y 
RESET X,Y 



10 FOR 1=0 TO 49 
20 SET I , I 
30 NEXT 

1 00 FOR 1=0 TO 79 
1 1 0 SET I . SQR (I) 
1 20 NEXT 



1 0 WOPEN 

20 PR I NT/T X.X$ 



なら ス卜 リンクと、 変数の 形 ガー 致しな ぐて はな 
りません。 

左の ©I て は、 READ 文の 最初の 変数、 すなわち 
ス卜 1 J ンク 変数 H$ に DATA 文の 最初の データ、 
すなわち ス卜 リンク " I \ —卜 " ガ 代入され ます。 
次に 2 番目の 変数 H に は、 数值 3 ガ代 入され、 次 
々に统 み 込まれて 行きます。 

READ …… DATA 命令て は、 READ 命令に 
つれて D A T A 文中なら 読み込む データ； tf 移って 
行きます が、 RESTORE 文 を 使う ことによ つ 
て统み 込む データ を DATA 文の 最初に 戻す こと 
； tf てきます。 

左の I 列て は、 文 番号 1 0 の READ 文に よって、 
変数 A、 B、 C に それぞれ、 3、 6、 9 の儸ガ < 弋 
入され ます ガ、 次に RESTORE 文ガ霾 なれて 
いるの て、 艾 番号 3 0 の READ 文に よって 変数 
D、 E に 代入され る值 は、 1 2、 1 5 と はなら す 
に、 それぞれ 3、 6 ガ 代入され る ことにな り ます。 

音楽の SIS 漢奏 をさせる 命令て す。 文字 SOT E 
MP〇 文て 指定 さ n だ テンポに のって、 MUS I 
C 文に ある クオ 一 テーシ ヨン 「"j 内の 旋律の ス 
卜 リンク （音程と 音 長の 指定 さ れた 音？！ の 集まり 
に 相当し ます） を 苜 にして ス ビーカ を 鳴らします。 
文 番号 3 00 て テンポが フ （最 = & 速い 速度て す） 
に 指定され ます。 文 番号 31 0 て、 7 の テンポて 
中音 域の レミ ファの 》 ソラガ 4 分 音?！ の 長さて 
けて 演奏 さ； H ます。 TEMPO 文ガ 無な つ だら テ 
ンポは 4 て 演奏され ます。 
左の I5U て は、 旋律 を 3 つの ス卜 リンク 変数に 代入 
してお いて MUS I C 命令 をさせる ちの てす。 五 
線? f て 示す と 右の 旋律が 
藻 奏されます。 なお、 T 〜 づ卜 
EMPO 文ガ ありません , jJ3 JJ /;v|=^ 
のて、 4 の テンポが 設定 ' 
されて います。 

DEF FN て 関数の 定義 をし ます。 文 番号 1 0 
0 は X 2 — X を FNA(X) に 、文 1 1 0 は iog, 0 X を 
ド1^8(乂）に、文120は100 6 Y を FNZ(Y) に 
定 親します。 関数 は 1 変数に 限ります。 

3巳丁の変数ス、 Y て 指定 さ れ る テレビ 画面 上の 
座標 を 点 10 させ、 RESET て 指定され だ 点 は 消 
され * す。 X 座楝は 画面の 左から S へ 0 から 7 9、 
Y 座 操 は 上なら 下へ 0 から 4 9 となって います。 
し e がって 画面の 左上 隅の 座 « は 0、 0 て あり、 
右下 隅 は 7 9、 4 9 てす。 

X、 Y の 指定 は 定数 以外に、 変数、 数式ても てき 
ます。 

左の フロ クラム は、 左上 隅から 画面の 下 飾 まて、 
斜線 を 描ぐ ちの てす。 

文 番号 1 0 0から120て、 画面に 放物線が 描な 
れ ます。 SQR (I) は 整数に 限りません ガ SE 
T 命令 は I NT を 含ん ていて 座 棟 指定 ガて さるの 

てす。 

カセッ 卜 テープに 数値 変数 ゃス卜 リンク 変数の 内 

容を窨 き 出す だめに、 データ g 用の ファイル とし 
てォ一 フンし ます。 



II0 



ROPEN 



CLOSE 



NPUT 



NPUT/T 



GET 



PR I NT 



PR I NT/T 

PR I NT/P 

S I ZE 
T I $ 



30 WOPEN " COST" 
40 PR I NT/T X . X$ 



1 0 ROPEN 

20 I NPUT/T Y . YS 

30 ROPEN "COST" 

40 I NPUT/T Y . Y$ 



50 CLOSE 



1 0 
20 



40 
50 



1 0 
20 
30 



NPUT A 
NPUT A$ 



30 I NPUT 



« "ス卜 リンク 
VALUE 1 ?" : A 



40 I NPUT A . A$ . B . B$ 



1 0 ROPEN 

20 I NPUT/T A 

30 I NPUT/T A$ 

40 I NPUT/T A . AS . B . B$ 

10 GET A 



20 GET A$ 



1 0 


PR 


NT 


20 


PR 


NT 


30 


PR 


NT 



PR 
PR 



NT 
NT 



A 

A$ 

A ; AS • B ； B$ 



"COST=" ； A 



10 PR I NT/T A 

20 PR I NT/T A ： A$ ■ B ： BS 

30 PR I NT/T ,, COST= M ； A 



PR 
PR 
PR 



NT/P 
NT/P 
NT/P 



A 

A ： AS . B ； BS 
" COST=" : A 



PR I NT S I ZE 



T I $=" 1 02030 " 

10 T I $=" 1 02030" 



上記と 同様に 変数の ちつ データ を " COST " と 
いう ファイル 名 をつ けて I 己 憶させる ための 華備て 

す。 

力 セッ卜 テープに 霤き 出され C 数 纏 変数 や ス卜リ 
ンク 変数の データ を統み 込む だめに、 データ 専用 
の ファイル をォー フンし ます。 
上記と 同様に " COST " という ファイル 名のつ 
いた データ 専用の ファイル を 捜して、 変数の デー 
タを统 み 込む だめの 準備て す。 

力 セッ卜 テープ を データ 専用の ファイル として、 
使用す る ことの 終了 を 宣言し ます。 W〇PEN、 
ROPENm 令 を 使つ だら、 必す ファイル は クロ 
ースさ れな ければ な り ません。 

キーボードなら 変数 A に対する 数値 を 入力し ます。 
キー ポー ド から ス卜' J ンク 変数 A$ に対する ス卜 
リンク を 入力し ます。 

キーボードから 入力す る 前に、 ス 卜'」 ンクの VA 
LUE^ を 表示させ^す。 ス卜 リンクと 変数の 区 
切り は セミコロン 「 ； 」 を 使います。 

数備 変数 ゃス卜 リンク 変数 は コンマ 「，」 て 区 ran 
ば異 合して 使用て き^す ガ、 入力す る 際に は 変数 
の 型に 合わせる 必要 ガぁ り ます。 

I NPUT と 同様の 機能 を、 力せ ッ卜 テープから 
読み込みます。 但し ROPEN 命令て オープン さ 
れ だ データ S 用の ファイル がなければ エラーに な 
ります。 



キー ポー 卜なら 変数 A に対して、 1 文字の 数値 を 
入力し ます。 そのと き キーが 押されて いないと、 
0 が 入力され^ す。 

キー ポー ド なら ス卜 リンク 変数 AS に対して、 1 
個の ス卜 リンク を 入力し ます。 そのと きキ一 ガ柙 
されて いないと、 A$ は 空になります。 

テレビ 画面に 変数 A の礦を 表示し ます。 テレビ 画 
面に ス 卜り ンク 変数 AS の 文字列 を 表示し ます。 
数 儀 変数と ス 卜 1 」 ンク 変数 を 混合して 使用て きま 
す。 また 区 CD りて セ 5 コロン ガ使 われる と、 スべ 

ース なして 続けて 表示され、 コンマ ガ使ゎ れ ると 
次の 表示 位瞿 （ 1 o 文字 ごとの 区 切り） なら 表示 
されます。 

クォーテーションマーク 「"」 て 囲ま； ス卜リ 
ンクは その 内容; y そのまま 表示され ます。 

PR I NT 命令 だけの 場合 は、 行 替えに なり ま g。 

PR I NT と 同様の 機能 を、 力 セッ卜 テーフ に 対 
して 実行し ます。 但し、 WOPEN 命令て ォーフ 
ンされ だ データ 専用の ファイル がなければ エラ一 
になります。 

PR I NT と 同様の 機能 を、 オプションの フ り ン 
ターに 対して 実行し ます。 フリン ター かついて い 
ない とさ は エラーに なります。 

現在 コンビ ユー タ内 にある メモ' J— て、 未使用の 
パイ 卜 数 を 表示し ます。 

内 S の 時 g ナを 午前 1 0 時 2 0 分 30 秒に tz ッ 卜し 
ます。 フス 一 テーシ ヨン マーク 「"」 内に は 6 文 
字の 数字 を 用います。 



1 1 



CURSOR 



TAB 



SPC 



D I M 



STOP 

END 

REM 
I NP 

OUT 



20 PR I NT T I S 

80 CURSOR 25.15 
90 PR I NT "ABC" 



10 PR I NT TAB (X) ； A 

20 PR I NT TAB (5) ； A$ 

1 0 PR I NT SPC (X) ： A 

20 PR I NT SPC (5) ； AS 



10 DIM A (20) 
20 DIM B (79 . 79) 
40 DIM C1 $ (1 0) 

50 DIM K$ (7 . 5〉 
200 STOP 



999 END 



1 00 REM ォ セロ ケ、、 —し 



10 I NP * 1 2 . A 
20 PR I NT A 



10 B=A - 2 

20 OUT # 1 3 . B 



内 S され だ K 計の 現在 時刻 を 表示し ます。 

テレビ 画面の 任 雇の 箇所に カー ソ; し を 移動させる 
のガ CURSOR コマンド てす。 X 軸 方向に は、 
左0«なら0 — 3 9、 Y 軸 方向に は 上 5!« なら 0~2 
4 の数值 まだ は 変数て 位臞を 指定し ます。 左の 例 
て は、 ス卜 リンク" ABC "は、 画面の 左 《 から 
2 6 番目、 上 端から 1 6 番目の ドッ 卜位霾 なら 表 
示され S す。 

テレビ 画面の 左' Sffi から 数えて X+ 1 字 g に 変数 A 
の值を 表示 し^す。 

テレビ 画面の 左 0» から 数えて 6 字 目から ス卜 1 リン 
ク 変数 A $ の 文字列 を 表示 し^す。 

カーソルの 位 霞から X 個の ス ベース を 表示し、 そ 
のの ち 変数 A の 優 を 表示し ます。 
カーソルの 位置なら 5 個の スペース を 表示し、 そ 
のの ちス卜 リンク 変数 A$ の 文字列 を 表示し ます。 

添字つ き 変数 を 使う 場合に は、 この D I M(0ime 
nsion の 略） 文て、 添字の 最大 を 宣言して おな なけ 
れ ばな り ません。 添字 は 0 から、 最大 2 5 5 まて 
使えます。 

添字つ き 変数 A( ) について、 お 列 を A(0) なら 

A(2 0) まて 2 1 個 用意し ます。 

2 重 添字つ き 変数 B( ) について、 配列 を B(0、 

0) なら B( 7 9. 7 9) まて 6 4 0 OS 用意し ます。 

添字つ きス卜 リンク 変数 C1 $( ) について、 配 

列 を C1 $(0) なら C1 $(1 0) まて 1 1 個用憲 

します。 

2 重 添字つ きス卜 リンク 変数 K$( ) について、 
お 列 を、 K$(0,0) なら K$(7,5) まて 48 個 
用意し ます。 

フロ クラ 乙の 実行 を やめて、 命令 待ちと なり^す。 

ここて CONT 命令 を 5 える と、 フ □ フラ^ を m 
行し ます。 

プロ クラ 乙の 最後 を 表わします。 フ 口 クラ^の 実 

行 を やめ 》 すか、 CONT 命令 を^え ると、 さら 
に 先の プロ クラ^ を 実行し ます。 

REM は注轵 文て あ り、 プロ クラ^ 実行の 際照視 
されます。 

I /〇 ポー 卜 番号 を 指定して、 その ポー 卜 上に あ 
る デ一タ の统み 出し を 行し \ ます。 
艾 番号 10 て、 I /〇 ポ 一卜 番号 1 2 (1 0 兹） 
にある データ を、 変数 A に 読み出し S す。 

外 8B デバイスに データ を iS る だめ、 I/O ポー 卜 
番号 を 指定して、 データ を 出力し ます。 
文 番号 20 て、 変数 B の e を I /〇 ポー 卜 番号 1 
3 の 出力 ポー 卜へ 出力し ます。 



(外 8B デ パイスとの 接統 は、 インタフェース ュニ 
ッ卜を 介して 行わ ねます。 I NP、 OUT コ マン 
ドの 詳細 は、 インタフェース ュニッ 卜お よび ュニ 
I X— サル カードの マニュアル によって 下さい。） 
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機械語との' J ンク 命令 



M 



PEEK 



POKE 



USR 



«-1 OS 数 
10 LIMIT 49151 
LIMIT 49151 

6mm 

30 LIMIT SBFFF 
LIMIT SBFFF 



50 LIMIT S9FFF 
60 LOAD "S-R 1 " 



90 LIMIT MAX 
LIMIT MAX 

20 A = PEEK (40960) 

*-1 6遒 数 
20 A = PEEK (SA000) 

40 B=PEEK (AD) 



- 1 一 10iS 数 
70 POKE 45056.175 



«~16iS 数 《"10it 数 
7 0 POKE SB000 . 1 75 

1 00 POKE AD, DA 



«-1 0 進数 
300 USR (491 52) 



«-1 6 進数 
300 USR (SC000) 

400 USR (AD) 

50 USR (SA000 . K$) 



BAS I C プロ クラ 乙て 使用す る エリア を、 4 9 
1 5 1 SltB ( 1 6 進て $BFFF) に 制 暇す る 命 

令て す。 

BAS I C プロ クラ^て 使用す る エリア を、 1 6 
ilSKBSBFFF に 制限す る ものて す。 1 6莛 表 
現 を 行う 頃 合 は、 このように マーク を 用い 
ます。 

機械 IS プロ クラ^'' S— R 1 "か、 ローデ イン 
クァ ドレス SA000 以 J= のちのて あれば、 左の 
フ 口 クラ^に よって、 機概 8S リン フエ リア 内に、 
力せ ッ卜 テープ ファイルなら 统み 込まれます。 

BAS I 〇フロ クラ^て 使用す る エリア を、 メモ 
1 リの 顥大に 設定し ます。 

1 0 進 番地 40960 にス ドアされ ている データ 
を 1 0S 数に 直して 変数 A に 代入し ます。 

1 Oii 数 を 使って _t 紀と 同じ 操作 を 実行させます。 

変数 AD て 指定 さ れ る 1 OilStffi に ス卜ァ されて 
いる デ一タ を 1 0 進数に 豳 して 変数 B に <弋 入 しま 

す。 

(BAS I C エリ フの 番地 を 指定 するとつ ねに 3 
2 ガ 読み出されます。） 

1 0 莛 番地 4 5 0 56 に データ 1 75 ( 1 0 進 表 
現） をせ ッ 卜します。 

1 6 進数 を 使って 上記と 同じ 操作 を 実行させます， 

変数 A D て )§ 定 する 番地に、 変数 D A て 示される 
値 （0 — 255 の 範囲） をセッ 卜します。 

1 Oil 番地 4 '9 1 5 2 にフ □ クラ^の コン卜 口一 
'し を 移します。 こ れ は 機械 IS の CALLSS 令と 同 
じ 饯能を 持って います。 SE つて、 機械語 プロ クラ 
ムの RET 命令 （1 Oil コードて 20 1 ) によつ 
て已 AS I C フ 口 クラ^の USR コマンド を 行な 
つた 次の ステー ドメ ン卜ぺ 戻ります。 

1 6 it 数 を 使って 上 §6 と 同じ ft 作 を 実行させます。 

変数 A D て 指定す る 1 0 進 番地 を CALL します。 

USR 関数て、 アドレスにつつ けて、 コン 7 を爾 
き、 ス卜 リンク 変数 を 1 個 指定す ると、 DE レジ 
ス タの應 は、 該当 ス卜 リンク （この場合 K$) の 
入って いる 先頭 番地と なり、 BC レジスタの 纏 は 
ス卜 リンク 長と なって、 USR (SA000) を 
実行し ます。 （この 形の 命令 は、 カラー ディ スフ 
レイコ ン卜 ロールても 使わ; n ます。） 



ス卜 リング 処理 命令 



し EFT$ 

R I GHT$ 
M I DS 
し EN 

ASC 
CHR$ 

VA し 
STR$ 

関 数 

ABS 

SGN 
I NT 
S I N 

COS 



300 A$=LEFT$ (XS - n) 

600 B$=R I GHT$ (XS . n) 

900 CS=M I DS (X$ . m . n) 

1 00 LX=LEN (X$) 

1 1 0 LS=LEN (X$ + Y$) 

200 A = ASC (XS) 

220 X1$ = CHR$(A) 

400 I =VA し （N$) 

440 N$ = STRS ( I ) 



ス卜 リンク 変数 X$ の 最初なら n 文字 目 まて を、 
ス卜 U ンク 変数 A$ に 代入し ます。 n は 定数で ち 
変数、 数式て ちか^い S せん。 

ス卜 リンク 変数 X$ の 右から n 文字 を、 ス卜 リン 
ク 変数 B$ に 代入し ます。 

ス卜 リンク 変数 X$ の 第 m 文字 目から n 文字 を、 
ス卜 リンク 変数 C$ に 代入し * す。 

ス 卜り ンク 変数 X$ の 文字の 長さ （文字 数） を、 
変数 LX に 代入し 》 す。 

ス卜 リンク 変数 X$ と Y$ の 文字の 長さの 和 を、 
変数 LS に 代入し ます。 

ス 卜 1 リンク 変数 X S の 最初の 文字の A S Ci i コー 
ド （ 1 0 進数） の 纏 を、 変数 A に 代入し ます。 

ASC 関数の £5 て、 変数 A の值に 等しい ASCii コ 
ードの 文字 （キャラ フタ） をス卜 リンク 変数 X 1 
$ に 代入し ます。 A は 定数、 変数、 数式い すれて 
ちかまい ません o 

ス卜 リンク 変数 N$ の 数字 ス卜 1 J ンク を、 その ま 
ま 数 纏と して 変数 I に 代入し ます。 

VAL 関数の 逆て、 変数 I の 数値 を そのまま ス卜 
'J ンク として、 ス卜 リンク 変数 N$ に 代入 し^す。 



1 00 A=ABS CX) 

1 00 A=SGN (X) 

1 00 A= I NT (X) 

1 00 A = S I N (X) 

1 1 0 A = S I N (30 ■ マ/1 80) 

200 A=C〇S (X) 

2 1 0 A=C〇S (200 • 80) 



変数 X の 纏の 絶対値 I X I を 変数 A に 代入し ます。 
カツ コ内は 定数、 数式ても かまいません。 
(例） ABS ( — 3) =3 
ABS (12) =12 

変数 x®e について X<0 のとき 一 1 を、 X = 0 
のとき 0 を、 X>0 のとき、 1 を 変数 A に 代入し 
ます。 カツ コ内は 定数、 数式て ちかまい S せん。 
(例） SGN (0. 4) =1 

SGN (0) =0 

SGN (-400) =—1 

変数 X の權 について、 X を 越えない 最大の 整数 を 
求めて 変数 A に 代入し ます。 カツ コ内は 定数、 数 
式て ちな まい » せん。 

(例） I NT (3. 8フ） =3 
I NT (0. 6) =0 
I NT (一 3. 87) = — 4 

変数 X の 偃 （ラジアン） について、 sinX の 備を求 
め 変数 A に 代入し ます。 カツ コ内は 定数、 数式て 
ちかまい ません。 ラジアンと 度の 閱1 系 は 

1 度 = 4 ラジアン 
てすなら、 S とえば sin 30' の 鎖 を 変数 A に 代入す 
るに は 文 番号 1 1 0 のよ ラ にします。 

変数 X の值 （ラジアン） について、 cosX の 值を求 
め 変数 A に^ t 入し ます。 カツ コ内は 定数、 数式て 
ちな まいません。 度て 計 * する に は S I N 関係と 
同様の 方法 を 使います。 文 番号 2 10 は cos 200' 
の 纏 を 変数 A に <t 入す る 命令文て す。 
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TAN 



A 丁 



SQR 



EXP 



LOG 



し N 



RND 



O T 



© 



300 
3 1 0 

400 
4 1 0 



A=TAN (X) 

A = TAN (Y • n/^ 80) 



A = 
A: 



^ATN (X) 

A QO/tt • ATN (X) 



1 00 A = SQR (X) 



1 00 A = EXP (X) 



1 00 A = し 〇G (X) 



1 00 A = LN (X) 



110 A = LOG (X) /LOG (Y) 
1 20 A = LN (X) /LN (Y) 



1 00 A = RND (0) 
1 1 0 B = RND ( — 3) 



200 A = RND (1) 
210 B = RND (1 0) 



変数 X の礦 （ラジアン） について、 ほ nX の 值を求 
め 変数 A に < ャ入し ます。 カツ コ內は 定数、 数式て 
ちかまい ません。 度て 計 » す るに は S I N 閔 数と 
同様の 方法 を 使います。 文 番号 31 0 は ほ nY' の 
^ を 変数 A に 代入す る 命令文て す。 

変数 X の 纏に ついて、 ほ rV'X の 通 （ラジアン） を 
求め 変数 A に 代入し ます。 カツ コ内は 定数、 数式 
てち か S いません。 計 S 結榘は 一^とき の 間の 纏 
となつ ます。 艾 番号 4 1 0 は ほ n X の值を 度に 
して 変数 AC<"t 入す る 命令文て す。 

変数 X の S について、 /又" の^を 求めて 変数 A に 
代入し ます。 カツ コ内は 定数、 数式て ちな 》 いま 
せんが、 正 *C は 0 の體 てな け ri ばな りません。 

変数 X の聽 について、 e' の懷を 求めて 変数 A に 代 
入し ます。 カツ コ内は 定数、 数式ても なまい ませ 

ん。 

変数 X の蹈 について、 常用対数 Dg, Q X の 値 を 求め 
て 変数 A に 代入し 》 す。 カツ コ内は 定数、 数式て 
ちかまい ません が、 正の (齒 てなければ なりません。 

変数 X の 纏に ついて、 自然対数 logeX の應を 求め 
て 変数 AC<"t 入し ます。 カツ コ内は 定数、 数式て 
ちかまい ません ガ、 正の 纏て なけ； n ばな りません。 
対数の 底ガ丫 のとき の 対数 log. X を 求める に は 文 
S 号 1 1 0 まだ は 文 番号 1 20 によって 求められ 
ます。 

0 . 00000001 なら 0 . 99999999 ま ての 值 をと る SL 数 を 
発生す る 関数て す。 カツ コ 内に は 負の 整数 
を 5 える 場合と、 正の 整数 を 5 える 場合と て、 2 
ほりの 処理 ガ行 わ； n ます。 
艾 番号 1 0 0 まだ は 1 1 0 のように カツ コ 内に 0 
は 負の 整数 を 弓え ると 乱数 発生の ィニ シャラ 

イス ガ行な わ れ て、 いっち ある 特定の 数葡を 発生 

して A にも B にも 同じ 值ガ 代入 さ れ ます。 
艾 番号 2 00 まだ は 21 0 のよ ラに カツ コ 内に 正 
の 整数 を 弓え ると RND 閱数を 使う G びに、 順次 
0 . 00000001 なら 0 . 99999999 まての 間の 備を とる 乱 
数 纏 を 発生し ます ガ、 この場合 カツ コ 内に 5 える 
正の 整数の 纏に は 無関係て す。 



左端の 白 ヌキの 数字 は 計算の 優先順位、 更に 優先され るの は カツ コ（ ） 内の 計算て す c 

(代入） 



1 0 
20 



A=X + 3 

B=7I 



10 A = X T Y (べき! S) 



1 0 A=-B 



(明） 



e 


* 


1 0 


A = X • Y 








1 0 


A = X/Y 


(除 寒) 


o 


+ 


1 0 


A = X+Y 


(加 鼻) 


o 




1 0 


A = X-Y 


(mm) 



X の 変数 値に 3 を 加えた 数值を A に 代入し ます。 
変数 B に tt( 3 . 141 5927) の 数値 を 代入し ます。 

変数 A に X Y の 計 萆結渠 を 代入し ます。 
(但し X T Y て 負数のと き、 Y が 整数て なけ 
れば エラーと なります） 

0 — B は減箄 てす が、 一 B の 「一」 は 負号て ある こ 

とに 注意して 下さい。 

変数 A に X と Y の 数 纏の 渠 » 結果 を 代入し ます。 
変数 A に X と Y の 数値の 除 S 結 索 を 代入し ます。 
変数 A に X と Y の 数 磨の 加 S 結喿を 代入し ます。 
荽 数 A に X と丫の 数値の «S 結 栗 を 代入し ます。 
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論理演算 子 



<> 
まだ は >< 

> = 

まだ は => 

< = 
まだ は =< 

* 



+ 



10 IF A = X THENH- 

20 IF AS=" XYZ " THEN- 

(等しい） 

10 IF AOX THEN ！… 

(等しぐな い） 

10 IF A>=X THEN— 
(より 大きい な 等しい） 

10 IF A ぐ =X THEN— 
(より 小さい か 等しい） 

10 I F (A>X) -(B>Y) THEN- 
(論理 損） 

10 I F CA>X)+(B>Y) THEN- 
(論理和） 



その他の シン ボ> ；レ 



9 



$ 



200 
21 0 



•?" A+B: 
PR I NT 



：" ； A + B 
A+B=" ； A+B 



220 A=X ： B=X t 2 ： PR I NT 'A.B 



230 PR I NT" AB" -. "CD' 



240 I NPUT" X=" ； X$ 



250 PR I NT" AB" , "CD' 



260 DIM A (20) . B (30) 

270 AS=" SHARP BASIC' 

280 PR I NT"* " ： AS ： " ^ " 

290 A1 $=LEFTS (A$ . 5) 

300 A2S="MZ-80K" 

350 LIMIT SA000 

370 POKE $A01 0.201 

400 I =S I N (X •■ でノ1 80) 



変数 A と X の 数 B ガ等 しいならば、 THEN 以降 
の 命令 を 実行し ます。 

ス卜 リンク 変数 A$ の 内容 ガス 卜 1 J ンク XYZ て 
あれば、 THEN 以降の 命令 を 実行し ます。 

変数 A と X の 数 纏ガ寻 しぐな いならば、 THEN 
以降の 命令 を 実行し ます。 

変数 A づ X より 大きい； 相等しいならば、 THEN 
以降の 命令 を 実行し ます。 

変数 A か X よ つ 小さい か 等しいならば、 THEN 
以降の 命令 を 実行し ます。 

変数 A が X より 大きぐ、 なつ 変数 B か Y よ り 大き 
いならば、 THEN 以降の 命令 を 実行し ます。 

変数 A が X より 大きい か、 まだ は 変数 B が丫 より 
大きいならば、 THEN 以降の 命令 を 実行し ます。 



PR I NT の 代わりに 用いる ことかて きます。 し 
だかって 文 番号 200 と 2 1 0 は 同等て す。 

命令文の 区切り を 表わす 記号て、 多耋 命令に 使用 
します。 文 番号 2 2 0 の 多重 命令に は、 3 つの 命 
令 文が 霾か れ ています。 

PR I NT を 続けて 実行し ます。 文 番号 23 0 て 
は テレビ 画面 上に、 「ABCDEj とス ベース を 空 
けす に^! ブて 表示され ます。 

テレビ 画面に 「X=」 と 表示し、 ス卜 リンク 変数 
X$ の キー入力 を 待 5 ます。 

タフ レー シ ヨン をつ けて PR I NT を 実行し ます。 
文 番号 2 50 て は テレビ 画面 上に ます AB と 表示 
し、 次に A から 1 0 文字 右の 場所よ 1 0 CD と 表示 
し、 次に C から 1 0 文字 右の 場所に E と 表示され 
ます。 

変数の 区 に 用し \s 例て す。 

" "内が ス卜 リンクて ある こと を 示し^す。 



ス卜 りンク 変数て ある こと を 示し^す。 



1 6 進数て ある こと を 示し * す。 



円周率 3. 1415927 を ^て 表わします。 
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コンピュータの 動作 中に エラーが 発生し だ 場合、 次の 形式て コンピュータより テレビ 画面 上に、 ェ 
ラー メッセージ ガ 送られます。 



© エラ一 の 種類 ERROR (直接 命令 を 実行中での エラ一） 

(D エラーの 種類 ERROR IN 文 番号 （プログラム 実行中での エラ一） 

① はとく にブロ クラ^の 作成 中 か 修正 中に 発生し、 文 番号に 無関係な エラ一 とみな される 場合 

② はとぐ にブロ クラ^の 実行中に おいて、 文 番号 x X X X に 発生し だ エラ一 とみな される 場合 

さらに、 エラーの 種類 は 次の もの ガ あります。 

SYNTAX 

プロ クラ 乙の 文法 上に 誤 まりが ある 場合 
MEMORY 

フ 口 クラ 乙と して 使える 記憶容量 を 越えた 場合 
DATA 

コンビ ユー タガ 扱える データの 範囲 を 越えた 場合 
M I SMATCH 

数値 を 扱う だめの 変数と ス卜 リンク を 扱う だめの 変数 を 混合して 使った 場合 
1 6FOR 

FOR — NEXT の ルーフて、 1 6 重 以上の ルーフ ガ 重なつ; C 場合 
1 6GOSUB 

G〇SUB;tf 多すぎて、 1 6 重 以上に GOSUB を 重ねて 使った 場合 
6FN 

DEF FN の 関数 定義て は、 その 中て 更に 别の 関数 定義 を 使える ガ、 この 多重 定義の 範囲 力' 
6 畫を 越えた 場合 
CONT 

STOP 命令、 END 命令 を 実行し だとき、 又は BREAK を かけて プロ クラ 乙の 実行 を 中 
止させ だとき、 CON T 命令て 中止した ところから、 実行 を 続行させる ことが てきます。 これ 
以外て CONT 命令 を 使ったり、 STOP し C あとて 何ら かの フ 口 クラ 乙 を 編集し なおし だり 
すると、 この エラーになります。 

(PR I NT A や L I ST 命令の よ o な 直接 命令 は 使って ち さしつかえありません） 
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物質が 核 反 によって エネルギーに 変わる とき、 その 分 だけ 質霤ガ 減少し ます。 太陽 は 水素 を 核 敏合反 
^によって へ リウ 乙に 変え、 1 杪 当たり 9 X10 25 カロリー もの 熱 を 発生し ます。 そして、 そのと きに 消 
失する 質矍は 400 万 卜ン。 太陽 は、 自分の 身 を 細らせな ガら、 私たち 生物 を 育てて いるの てす。 とはい 
う ものの、 生物の 住む 唯一の 惑星と 考えられる 地球 を 照射す る エネルギー は、 その 約 20 億 分の 1 、 しか 
も その 1/3 は 宇宙に 反射して しまいます。 今、 地球上て は 人び とガ 有効に 使える エネルギー ガ不 足して 
いるた めに 皆ガ 悩ん ています ガ、 何とも もったいない 話て すね。 



ぉ黾 のおん 靴^^^ 9 しくみ 




リウ 厶 

1 に 5 らノ トン ヶ' ぐ紊 4\- 5 ん 0OO ラトン のへ リウん に 化け, ラ X /0 なゥ o'i-9 

も 祭; t しま^ , —— 
^りう $り_20 ィ慈^ 91 ズ I" よ fei 哬' に全リ 1 します' ( 



》 




メ 



ラ 



土& 王 す?'： 至' J ま？ 3 ヱ ネ 'レ F —は 

AS ,000,000,000,000,000^)'/^ 

13.6%, 




23% 



ききへ 

ぐき衲ポ肴ォ セれて 
しま》 

海へ 

(^ェ お レキ- の L 

め 储^0： イ^ huiS.) 
f# へ 



(i^m.iiv'i? お" の 

!• ネ' レギ' 一.;） 
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MZ — 8 0 シ リースの ディスプレイ コード を 下表に 示し 5 す。 コード は 10 進数に よってい ます。 たとえば、 
POKE 命令て ビデオ RAM ェ 1 リア （10 進 番地の 53248~54247) 内に：! の コード を 転送す ると、 
テレビ 画面の 該当 位置に その 文字 ガ表 示されます。 だとえば、 POKE 53248.1 を 実行させる と、 
テレビ 画面の 左上 隅に " A " tf 表示され ます。 なお 表 中て 四角 カツ コて H んて いない カナ 文字 は/」 \ 文字 を 表 
わします。 





文字 


コード 


艾字 




文字 
スナ 


コード 




コード 
— J 「 


文字 
人 今 


コード 




コー K 
曜 


入 了 


り 


'ゆ， 
ド 


Q "7 




~7 A 


LJ 


I I I 


Lj 


1 H o 


\D\ 


1 C> O 


* 


o o o 

ei d 


[pi 


1 
l 


ヌ 


Q Q 


|OJ 


/ o 


Lzj 


i i ビ 


LJ 


-1 /1 Q 


ナ. 


1 O D 


X 


O O Q 
乙 乙 6 




つ 
ど 




Q a 

o y 




/ り 




1 1 づ 


I ~ I 


1 O U 


', ― 


1 Q 7 
1 O / 


ッ 




I ~~ I 


O 


し 


4 u 




/ / 






l_l 


1 O 1 


m 


-1 Q Q 


、、 




n 
. i 


A 

4 




4 1 


.9 


つ o 




lib 


」 


-ICO 

1 O ^ 


， 


i o 9 


o 


つ っ广 






la 


A ど 


目 


"7 r\ 

/ y 


[ ■ i 


1 1 り 


LJ 


-ICQ 




i y u 


ォ 


つつ" 7 




D 


[pi 






o リ 


fXl 


1-17 


LU 


'l c /1 
1 O *4 




1 O 1 

i y i 




o O Q 
^ど S 


r/ri 






/1 A 


g 


Q A 
O 1 


rpi 
L<J 


1 1 o 




1 O O 


O 


i n o 




o o o 

^ど y 


o 


o 
O 


o 


^4 O 


[J] 


D 乙 








I O D 


ノ 


1 y o 


U 


ウス n 

*C O U 




y 




4 り 




Q Q 

o O 


圈 


1 ど u 




I O / 






□ 


^ O 1 




1 U 


m 


A フ 








i ビ i 


m 


-ICQ 


ァ 


つ n ら 


pi 


O Q O 
ど v5 ど 




1 1 


.〜 


A Q 


鬥 


Q C: 

o o 




1 £L 乙 


纖 

鬥 


1 c O 

i o y 


V 


i y り 


B 


O Q Q 
O O 




1 つ 


rrn 

LkJ 


/1 o 


LI 


O D 






u 


1 D U 


ヮ 


i y / 


rwi 

LU 


O ^4 




1 O 
1 O 


.ivi 


o u 


lj 


Q フ 

o / 


s 


1 ど ^ 


1 ^ 1 


I D I 


ヌ 


1 Q Q 


ra 
L9 


O Q C 
ど。 O 


la 


■ ■ - 


M 

I IN I 


O 1 


n 
i— i 


Q Q 
O O 


5] 


1 乙 O 


LU 


ICO 

1 D ど 


l2l 


i y y 




O Q O 
O D 


till 


1 K 


Ini 


o ビ 


□ 


Q Q 


s 


I 乙 D 


1 ~ I 
U 


*1 « Q 
1 ◦ O 


| ンノ | 


o ri n 

£l u u 


H 


O Q 7 
どリ, 


円 


1 D 


LEJ 


b o 


m 
LU 


y U 


Vm 


1 ど / 


u 


1 D 4 


ゥ 


U 1 




O O Q 
^ O O 


< 

> 


1 7 


リ 


5 4 


□ 


9 1 


V 


1 2 8 


SP 


-I ^ cr 

1 D O 


ffl 


20 2 


大 


2 3 9 


PS 


1 o 


InJ 


b o 


匿 ~ i 
U 


y f 




i ^ y 


图 


1 b b 


凶 


； .- ■■, - -; 




2. AO 


.sp 


1 9 


c 


b b 




y o 


□ 


1 O U 


□J 


lb/ 


I や I 


r\ a 








2 0 


r=fl 
山 


b / 


LU 


9 4 


ffl 


1 o 1 




1 b o 




■ : i \ , 

20 o 


十 


^ 4 ^ 




Z 1 




b o 


— ， 
m 


O rr 

y b 


-n 


1 o ビ 




i b y 




^ f\ c. 
^ U O 




っ^ ゥ 

4 o 




2 2 


r\7i 


o 9 


rm 
IE 


9 b 


m 


1 o d 


- ノ 

□J 


1 /0 








ZA A 




つ o 


|W| 


D 0 


「 I 

u 


9 / 


m 


1 o 4 


rm 
\B 


1/1 




つ o 

^ U o 


日 


つ/! に 


ILJ 


24 


Y 


な A 


I — 1 


9 o 




ぺ つに 
lob 


r^i 


\ / z 


y 


f~\ (~\ 


回 


^ 4 b 




2 5 


M 
Y 


62 


1 — 1 

u 


9 9 


き： 


1 O D 


12J 


I/O 








つ/! ~7 




26 


つ 


63 


」 


1 00 


m 


13 7 




1 74 


nn 
i/kJ 


211 




2 4 8 




2 7 


m 

m 


64 




101 


m 


1 38 




1 75 


l±J 


212 




24 9 




乙 o 


L_J 


D O 




1 n ク 








1 フ a 


(71 


ど I O 


'金' 


o r n 
ビ o リ 


rsi 
. 見 


29 


a 


66 


m 


1 03 


□ 


1 40 




1 77 




2 1 4 


囡 


251 




30 


[B 


67 




1 04 




1 4 1 


m 


1 78 


ィ 


21 5 


固 


252 




31 




68 


ffl 


1 05 




1 4 2 




1 79 


ュ 


21 6 


圉 


253 




32 


回 


69 


a 


1 06 


田 


1 43 




1 80 


m 


2 1 7 


画 


254 




33 


ffl 


70 


m 


1 0 7 


* 


1 44 


囵 


1 81 




21 8 


m 


255 


閻 


34 


m 


7 1 


圏 


1 08 




1 45 




1 82 


o 


21 9 


m 






35 


m 




回 


1 09 


X 


1 46 




1 83 






m 






36 


a 


73 


m 


1 1 0 




1 4 7 


E 


1 84 


o 


221 


@ 







(注） 表 中て (EE! は 空白 （ス ベース、 フランク） を 表わす ものと します。 
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特殊 文字コード 



次に 示す 特殊 文字コード は " " （引用符） をつ けて PRINT 命令 を 実行し だとき、 カーソルの 移 
動、 ホー 乙 設定、 画面 ク リアの 機能 を もちます。 MZ — 80 シ リースに はこの コード ガ 6 つあります。 
コード は 1 0 進数に よります。 



コード 


記号 文字 


能 


キ 




1 93 


□ 


下に 1 文字 分 カーソル 移動 


□ 




1 94 


□ 


上に 1 文字 分 カーソル 移動 


□ 




1 95 


E3 


右に 1 文字 分 カーソル 移動 


B 




1 96 


S 


左に 1 文字 分 カーソル 移動 


B 




1 9 7 


O 


画面 左上す みに 力 ソール 移動 （ホーム） 


IHOMEI 


1 98 


a 


画面 ヮ 1 j ァ とともに ホー 乙 




CLR 





メモり 一 マップ 



RAM 4 8 K パイ 卜 フル 実装と して、 BASIC を 搭載した 場合、 概略 下記の ェ 1 J ァ 分割と なり^す。 



$0000 

S1 000 
$1 200 



SD000 
SE000 

SFFFF 




モニター ブロ クラ 乙 

モニター スタック 及び ワーク ェ 1 J ァ 



BAS に インタープリタ （約 1 4K パイ 卜） 



BASI C フ 口 クラ^テ キス 卜 及び 変数 ェ 1 リア 

この エリア を LIM ぽて BASIC エリアと 機械語 エリアに 分割 

すれば、 LIMIT 以降、 $CFFF まて ガ、 機械語 リンク エリ 

ァ となります。 



ビデオ RAM ェ 1 リア 

各種 端末 コン卜 ロール ェりァ 



16 ほ 



MZ — 8 0 シ 1 リースの アスキー コード を 下表に 示します。 BAS I C の CHR$(n)、 ASC(X$) によ 
る 文字と コードの 変換 はこれ に 相当し ます。 コード は 1 0 進数に よってい ます。 なお 表 中て 四角 カツ コて H 
ん ていない カナ 文字 は/」、 文字 を 表わします。 また EH は キャリッジ リターン コード、 17~22 まて は 力 
一 ソル コン卜 □ ールの だめの コードて す。 



■ 


國 


■ 




















































〇 




37 


~w~ 


74 


丄 


1 1 1 


—■， 


. .1 - 


T' 


18 5 


fin 


p p p 


■ ― 


1 




38 


m 


75 




1 1 2 


画 


1 49 




1 8 6 


[HI 
ltd 


i— (— 


. 塵 


2 




39 


□ 

i — i 


76 




1 1 3 


园 


1 50 




1 ft 7 


[Ffl 
[LJ| 


OO A 
C— <_ 


口 


3 




40 


Rl 

—リ 


77 


M 


1 1 4 


因 


1 51 


ra 






Q o c 

C— £- <^J 


圍 


4 




4 1 




78 


i * • i 

M 


1 1 5 


困 


1 52 


. ノ. 


1 89 


：: - 


C- \j 


m 

LLJ 


5 




42 




79 


M 


1 1 6 


困 


1 53 




i <y リ 


、、 


p Q 7 


口 


6 




43 




80 


\E 


1 1 7 


圇 


1 54 


Rl 




o 


t— I— 




7 




44 




8 1 


M 


1 1 8 


囡 


1 55 


LZJ 


1 づ <— 




O O Q 

ご y 


鬥 

□ 


8 




45 


H 

1 1 


82 




1 1 9 


固 


1 56 




1 Q Q 


LI 


o q n 
ご ◦ リ 




9 




46 


[71 

l 画 ' 


83 




1 20 


圉 


1 57 


凶 


1 Q /1 

1 vT/ *-* 


I — I 

y 


ご O I 


rrn 


1 0 




47 




84 




1 21 




1 58 




1 Q K 

i y o 


□ 


O Q O 

どづ ど 


m 


1 1 




48 


foi 


85 


■ - ,， 

M 


1 22 


囫 


1 59 




i y o 


1 — i 

□ 


O Q Q 
^. O O 




1 2 




49 


LU 


86 




1 23 


m 


1 60 


Hoi 


1 Q フ 


□ 


p Q 4 

な vJ 


！ - 


1 3 


| ハ n| 


50 


[2] 


87 


i. . ； 

w 


1 24 




1 61 


Lzj 


1 Q Q 




O Q R 

ご O v_* 


[71 

i 一 


1 4 




51 


f3l 


88 




1 25 




1 62 




1 q q 


LI 


O Q « 
こ o リ 


n 


1 5 




52 


L_TJ 


89 




1 26 


m 


1 63 


亍' 


POO 
二 \_ /リ 




p 3 7 




1 6 




53 


[51 


90 


\z\ 


1 27 


+ 


1 64 


rrn 

\hi 


こ \j i 


藥 


O Q Q 
O <-> 


(71 


1 フ 


□ 


54 


f6l 


91 


LE 


1 28 


[sp] 


1 65 


[Zl 


ク n 9 
どリど 


LI 


O Q Q 
ど。 y 


n 


1 8 


□ 


55 


[71 


92 


H 


1 29 


o 


1 66 


Rl 


o n ^ 

こリ o 




O /l n 

こ リ 


n 


1 9 


B 


56 


1 リ 1 


93 




1 30 




1 67 




o o 4 
こリ 4 -t 


Li 




[51 


20 


Q 


57 


[91 

1 ゾ I 


94 




1 31 


J 


1 68 


ぼ 


^ \j 




C- "-r C- 


□ 
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(注） 表 中て は 空白 （ス ベース、 フランク） を 表わす ものと します。 
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MZ — 8 0 シ リース B AS I C に は、 機械語 フ 口 クラ^の コン 
卜 ロール 命令 ガぁ り、 BAS I 〇ブロ クラ 乙と リンクさせる こ 
とガ てきます。 機械語 フ 口 クラ 乙と は、 BAS I C のよ o な S 
級 言語、 即ち、 人間に とって わかりやすい 言語に よる フロ クラ 
ム 言語と はち かって、 コンピュータの 心臓部て ある 中央 処理 装 
置 （CPU) に 直接 命令 を 与える ものて あり、 言語と いうより 
機械 コードと いつた 性質の ものて す。 

コンピュータに とって、 プロ クラ 5 ンク 言語と は、 いぐつ かの 
レベルに よって 階層 的な ものと して 捉える ことかて き、 BAS 
I C などの 高級 言語、 アセンブリ 言語、 機械語 は、 およそ 右 S 
に 示し だよう な 階層 をな して、 中央 処理 装罾 との 位鼴 つけ かな 
されて います。 BAS I 〇ブロ クラ^な どて は、 ァ セン フラガ 
行うべき 部分 や 機械語に 変換され る 部分な どか、 BAS I C 内部て 自動的に 行なわれ、 そ o しだ 操作 
を 私たちが じかに 行わな < ても渰 むように なって いるの てす。 

しかし 逆に、 私たちが、 CPU を じかに コン卜 ロールして、 たとえば 高速の 処理 を 行わせたい 場合 や、 
BAS I C 命令て は 実現て きないよ うな 特殊な コン卜 口— ルを 実行し だい 場合 ガ考 えられます。 そん 
な 時には、 オプションの ソフ卜 ウェア、 「SYSTEM PROGRAMj や 「MACH I NE L 
ANGUAGE」 等 を 使う ことによって、 自在に、 アセンブラ プロ クラ ミンク や 機械語 ブ 口 クラ ミン 
ク； tf てきます。 そうした 多様な (^用 性が、 MZ — 8 0 シ リース クリーン コンビ ュ一タ の 大きな 特質て 
有お、 ここて 解説す る、 BAS I 〇フロ クラムと 機械語との リン フは、 両者 ガ 共存して それぞれの 特 
質 を 生かし だ プロ クラ 5 ンクガ 可能な こと を 示す ものて す。 




BAS I C プロ クラ^と 機械語 ブ ログ ラ厶の リン ヮは、 一般的に は、 「SYSTEM PROGRA 
M」 まだ は 「MACH I NE LANGUAGEj て 作成され だ 機械語 プロ クラ^フ アイ ルを、 BA 
S I C の L I M I T 命令 を 使って 確保し S 機械語 フ 口 クラム ェ 1 リアに ローデ インクして 行われます。 
そして、 BAS I C 命令、 USR( ) を 使って、 機械語 プロ クラム をサ フル一 チンと して CALL す 
るの てす。 



それに 対して、 BAS I C 犖 独て 使用す る 場合に は、 POKE 
命令、 PEEK 命令 を 用いて、 直接の メモリ アクセス を 行う こ 
とになります。 すなわち、 POKE 命令に よる、 機械語 プロ ク 
ラ^の 機械語 ェりァ への 書き込み、 PEEK 命令に よる、 機械 
語ェ 1 J ァ からの データ 読み出し を 行いながら フロ クラ 乙 を 作成 
して ゆき、 出来 上つ だら、 USR( ) 命令 を 使って 1 リンクす る 
わけてす。 

右 12) は、 R AM 4 8 K パイ 卜 フル 装備の 場合に、 LIMIT 
$9FFF を 行って、 BAS I C エリアと 機械語 エリアと を 分 
離して おいて、 POKE 命令に よる デ一タ 書き込み、 PEEK 
命令に よる データ 読み出し、 そして、 USR( ) による ブロク 
ラ 乙の リン キンクの 大まかな よ o す を 示し だものて す。 

POKE 命令、 PEEK 命令て 扱ラ 機械語 フロ クラム データと 
は、 後に 示す、 「Z 8 0 命令 表」 にある 命令の コード （2 進コー 
ド） を 1 0 進数に 直し だものて す。 さあ、 これらの コン卜 □ 一 
ルを、 実際に 行って みる ことにしましょう。 



$1 ooo 



USR 
(SAOOO) 



BAS I C 
フ □ クラム 



？ エリア 



SAOOO 



POKf 



PEE K 



BAS I C 
ノ>9 ーフ リタ 



S BAS I C 
fT'JT> 



LIMIT 
S9FFF 



I 



5CFFF 
n 6S« ゆ） 



,««l*S エリ P 



I23 



例題 

テレビ 画面い つばい、 MZ — 8 0 シ リースに ある キャラクタの 全部 を 使って 埋めつ ぐす こと を 考えて 
みます。 これ は 要するに、 キャラクタ ジェネレータ 内の 全ての 文字 を 表示させる 訳て あり、 ビデオ R 
AM に、 0 から 2 5 5 の 8 ビッ卜 データの 全て を 順次 セッ 卜すれば よい ことになります。 すなわち、 
BAS I C の PR I NT 文な ど は 使えない ことにな り、 何ら かの 方法て、 ビデ 7TRAM に賺接 データ 
をセッ 卜しな ぐて はなり ません。 これ はたと えば、 

10 AD=53247 

20 FOR A=1 TO 4 ： FOR C=0 TO 255 :AD=AD+1 

30 POKE AD，C 

40 NEXT C ： NEXT A 

といった、 POKE 文 を 使って 実行す る 方法 ガ考 えられます。 この フ口 クラム は、 つまりこう いう こ 
とてす。 ビデオ RAM は、 先の メモ 1 J— マップの (3 から わかる ように、 $D000 = 53248 番地 
からと なって おり、 テレビ 画面に、 キャラクタ ジェネレータ を 通して 接続され ています。 そこに、 0 
〜2 5 5 の データ を インク リメ ン 卜しな から 順番に セッ 卜して 行って いる わけて、 つまり 

POKE AD。 0 … S^S^^r レスに、 変数 c に 相当す 

という 働 きか、 POKE 命令に ある こと かわかる と 思い^す。 さて、 考え方 を 変えて、 今度 は 機械語 
ブ 口 クラ 乙 を 機械語 エリアに 作成して、 その サ フルー チン を BAS I C から 呼び出して 以上の 動作 を 
行わせる ようにして みます。 その一 例 は、 次のようになります。 ここて は BAS I C ェ 1 リア は、 $7 
FFF=32767 に 限定して います。 

10 PRINT "H M :LIMIT $7FFF:G〇SUB 1 00 ： USR( $8000) ： END 

100 FOR AD=32768 TO 32791 :READ D 

110 POKE AD,D :NEXT AD ： RETURN 

120 DATA 197， 213, 229, 22， 〇， 33， 〇， 208, 1， 232， a 114, 35 
130 DATA 20， 11， 120, 177， 194, 11， 128， 225, 209， 193, 201 

DATA 文中に ある ものが 機械語 フ 口 クラ 乙て、 それ を、 $8〇0〇〜$80 1 7 番地に POKE 命 
令に よって 軎き 込んだ 後に、 USR ($8000) を 行って いるの てす。 この フロ クラ ^は、 SYS 

ケ一 タフ ルノ X イナ 1 リ 形式） 
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(この 1 」 ス卜 は、 ドッ 卜フ 1 J ンタ MZ — 80 P3 による 出力 例て す。） 




USR( ) 命令 は、 （ ） 内に 示した アドレスの 機械語 サフ ルーチン フ0 クラ 乙 を CALL (コール） 
する 命令て す。 従って、 今の 例ても 機械語 プロ クラ 乙の 終わりに は 201 =RET の 1 0 進数 コ一 
ド、 ガ 罾かれ ていて、 それによ つて、 もとの BAS I C テキス 卜へ RETURN しています。 

これに 対して、 USR(address、 string) という 形の USR 命令 も あり、 これ は USR(address) 
の 働きと ともに、 次の 条件て、 ス卜 リンク 変数の 内容 を レジスタ 値に もって CALL ガ行 われます。 

DE レジスタの 値 該当 ス 卜'」 ング 変数の 内容が セッ 卜されて いる 場所の 先頭 番地 

BC レジスタの 値 該当 ス 卜'」 ング 変数の 文字 数 （最大 2 5 5) 

だとえば、 A$=" MZ — 80SER I ES CLEAN COMPUTE RS " て あるとき、 US 
R ($8 0 0 0、 A$) を 実行した とすると、 コン卜 ロール は、 $8 0 0 0 番地へ 移され、 その 時、 
DE レジスタの 値 は、 A$ の 先頭、 すなわち、 文字'' M" の セ ッ 卜されて いる 番地 を 指し示して おつ、 
BC レジスタの 值は、 AS の 文字 数、 すなわち 2 7 = LEN (AS) となって いるの てす。 これによ 
つて、 BAS I C 内て 使用して いる ス 卜 1 」 ンク 変数 を、 機械語 フ ログ ラ^に 1 」 ンク する ことかて きる 
ことになります。 



PEEK 命令 は、 機械語 エリア 内の 或る 番地に セッ 卜されて いる データ を 読み出す ものて、 ^とえば 
D=PEEK (40000) 

とすると、 1 0 進 番地 4 0000 にある データ を、 変数 D に 代入し ます。 この場合、 BASIC エリ 
ァ 内の 番地 を 指定す ると 常に 3 2 ガ 読み出されます。 

機械語 エリア 内の データ を、 そのまま ファイルへ SAVE する こと はてき ません。 それ を 行う に は、 
たとえば、 PEEK 命令に よって その データ を 変数に 代入して 来て、 それ を WOPEN 命令、 PR I 
NTZT 命令 を 用いて データファイルに 書き出す 方法 ガ考 えられます。 ファイルの 読み込み は、 R〇 
PEN 命令、 I NPUTZT 命令 を 用いて、 データ を 変数に 読み込み、 それ を POKE 命令 を 使って 
機械語 エリア ぺセッ 卜する ことになります。 

「SYSTEM PROGRAMj または 「MACH I NE LANGUAGEj によって 作成し^ 
機械語 フロ クラ 乙 ファイル を 使用す る 場合、 LOAD 命令に よって プロ クラ^の ローテ インク を行ラ 
ことが てきる こと は 先に 述べました。 従って、 LOAD 命令 は、 BAS I C テキス 卜 ファイルの 読み 
込みに も、 機械語 プロ クラ 乙 ファイルの 読み込み にも 使える のて す。 LOAD 命令 は、 次の よ" 5 な 形 
式て 実行され ます。 



し o 




?»w ぷェ 1 j ァへ □ 

一 デ インクす る 
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テレビ 画面の 構成 



テレビ 画面 は右囵 のように 2 5 行 4 0 列の 画素 子 
から 構成され ています。 1 つの 画素 はさら に 8X 
8 ドッ卜 マ 卜 リックスに よって 構成され ています。 
これらの ドッ 卜の 組合せて 1 つの 画素 子に、 ある 
文字 を 表示して います。 

テレビ 画面 上の 画素 子の 位匾 は、 ビデオ RAM 
と して 内部 メモ 1 」 一の 53248 - 57343 

(1 0 進数 番地） に 割り当てられ ています。 
テレビ 画面の 任意の 位置に、 ある 文字 を 表示す 
るに は カーソル など を 用いて キー入力 すれば よい 
のて すか、 次に 示す ような POKE 命令 を 用いる 
こと 可能て す。 

例えば 任意の 位置に ある 画素 子の メモリー 番地 
53248 からの 変位 X (0^XS999) を 指 
定し、 表示したい 文字の ディ スフ レイ コード を Y 

(0SYS255) とすれば、 

POKE 53248+X, Y 
の 命令に よりその 文字; tfX の 位罾に 表示され ます。 

特殊な 制御 命令 




40 列 



MZ — 8 0 シ 1 J— ス BASIC に は、 前記の POKE 命令 を 含め 次の ような 特殊な 制御 命令が あります。 

POKE 53248+X, 丫 ；画 素子 X の 位臛に ディ スフレ イコー ド丫に 相当す る 文字 を 

表示す る。 

POKE 4509, 0 ；キ一 を 押した ときに ェン卜 リーべ ルガ 鳴る。 

POKE 4509, 1 ；キ一 を 押し^と きの ェン卜 リー ベル をと める。 



USR (62) 



この ステー 卜 メン卜 を 実行す る ことにより、 ベルガ 鳴る. 



BAS I C (SP-5030) の コマンド 解説の 最後に、 I NP、 OUT 命令の 使い方 を 説明いだ し 
ます。 この 2 つの 命令 は、 外部 機 §8 との データ 入出力 を 行うた めの ものて、 オプションの ュニ バーサ 
ル I ノ O カード を 介して、 8 ビッ卜 デ一タ (1 0 進て、 0〜255 の 範囲の コード） を 入出力す る こ 
とがて きます。 MZ — 8 0 シ リース は、 フリン タ、 フロッピーディスク 等 を 含めて、 外部 機 88 との ィ 
ン ターフェ イス は、 ォ フシ ヨンの インターフェイス ュニッ 卜 （MZ — 80IZO) を 用いて 行います。 
各 専用 外部 機器に は、 それぞれ インターフェイス カー ドガ 付 ほに なって おり、 それ を インター フェイ 
ス ュニッ 卜に 揷 入して コンビ ユー タ 本体と 各 機 8§ と を 接続す るよう になって います。 ュニパ 一サル I / 
〇 力一 ド (MZ-80 I ノ 01) は、 文字通り、 汎用 I ノ 〇 であり、 特定の 機 88 のた めの ものて なぐ、 
ユーザの 自由な 利用の てきる インターフェイス カードな のて す。 

ュニパ 一サル I ノ 〇 カード 上に は、 ポー 卜 アドレス 選択 スィッチ かついて おり、 I ZO ポー 卜 番号と 
して、 0~239 (1 6 進の 00H〜EFH) まて 任意に 決める ことが てきます。 240〜255 (1 
6 進の F0H〜FFH) まて は、 各 奪 用 外部 機器 用 ポー 卜と して 専用に 使用され ています。 
I NP、 OUT 命令 は、 この ポー 卜 アドレス を 指定して、 次の ような 形て 使用し ます。 

ポー 卜 アドレス P の 入力 ポー 卜より 8 ビッ卜 データ を 入力し、 それ 

inp it p n 

を 1 0 進 変換し だ 数値 (O 255) を、 変数 D に 代入す る。 
ポー 卜 アドレス P の 出力 ポ一 卜に 変数 D の 値 （〇 255) を 2 進 
OUT * P - D ……… 数に 変換して 出力す る。 

ユニバーサル I Z〇 カードの 仕様 （入出力 レベル、 使用 I C など） の 詳細 は、 「UN I VERSAL 
INTERFACE CARD MANUALj によって ください。 



ユニバーサル I ノ O 力一 ドの 使用に よって、 M 

Z — 8 0 シリーズ クリーン コンビ ユー タを、 各 

種の ユーザ 機器に 接続させる ことかて きます か 

ら、 たとえば、 X —丫フ ロッタ や、 PTR、 P 

TP (紙 テープ' J ータ、 パンチ や） や、 その他 
ミュージック シンセサイザ など をコン ドロール 

する ことか 可能て す。 

MZ — 8 0 ヮ リーン コンピュータの ベース シス 

ラし (プリンタ、 フロッピ一 ディスク、 インタ 
一 フェイス ュニッ 卜の 構成す る 基本的な シス テ 
ム 構成） に加えて、 巾 広い 拡張 性、 発展性 ガ M 
Z — 80 シ リースに は隨 所に 盛り込まれ ている 
のて す。 „ 





MZ — 8 0 シ U —ズは 中央処理装置 （CPU) として Z 8 0 を 用いて いますので、 参考の だめ、 
以下に その 命令 表 を 示して おきます。 
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(HL)*-n 


QQ 




"0 


1 n f IX + ri、 n 

l_ 1_/ い A T リノ • 1 1 


(IX 十 a) — n 


1 1 


n 

\j 1 1 


1 01 

I U 1 






f\f\ 

uu 


nu 


1 IU 








M 

u 




し D (IY + d),n 


(lY + d) — n 


11 


n 
111 


101 






UU 


I 1 u 

a 


1 1 U 


薩 n a ( 


O 
< 


UU 


n 
uu I 


U IU 


1 r> a f pip \ 


A — (DE) 


uu 




U 1 u 




A — (nn) 


uu 


i i i 


U I u 








n 










f 1 




LD (BC). A 


(BC)— A 


uu 


nnn 
uuu 




し D (DE). A 


(DE) — A 


00 


010 


010 


し D (nn).A 


(nn)— A 


00 


110 

n 


010 

— ♦ 


LD A. 1 


A — 1 


11 


n 
101 


101 






01 


010 


111 


LD A. R 


A — R 


11 


101 


101 






01 


011 


111 


「 
■> 


l — A 


11 


101 


101 






01 


000 


111 


LD R. A 


R*-A 


11 


101 


101 






01 


001 


111 


1 6 ビッ 卜0 —ド グルー ブ 


LD dd.nn 


0d*-nn 


00 ddO 
*- n 


001 


LD IX, nn 


IX — nn 


11 


n 
011 


~ ¥ 

101 






00 


100 


001 








n 




LD IY. nn 


IY— nn 


11 


n 

111 


101 






00 


100 
n 


001 








n 


— • 



ニー モニック 



実行 内容 



LD H し. （nn> 
LD da, (nn) 

し D IX. (nn) 

LD iy, (nn) 

LD (nn),H し 
LD (nn).dd 

し D (nn). IX 

LD (nn), IY 

LD SP. HL 
LD SP. IX 

LD SP. IY 

PUSH qq 

PUSH IX 

PUSH IY 

POP aq 
POP IX 
POP IY 



命令 コード 



EX DE, H し 
EX AF. AF' 
EXX 



EX (SP\ HL 
EX (SP). IX 
EX (SP).IY 



H*-(nn + 1) 


00 


101 


010 


L — (nn) 


« ~ 


n 
n 


~ ¥ 


dd— (nn + 1) 


11 


101 


101 


dO( — (nn) 


01 

« — 


adi 
n 


011 


ix M *-(nn + D 


11 


n 

011 


101 


ix, — (nn) 


00 


101 


010 






n 


— • 


IY H *-(nn + 1) 


11 


n 

111 


— » 

101 


IY に — （nn) 


00 

4 ~ 


101 
n 


010 


(nn + D — H 


00 


n 

100 


010 


(nn) —し 




n 
n 


— • 


(nn + D — adn 


11 


101 


101 


Q 
Q 


U i 


ddO 
n 


-* 




4 


n 




(nn + 1)*-ix 


1 1 


01 1 


101 


(nn) — ix. 


00 


100 
n 


010 


(nn + D*-iY H 


1 1 


n 

111 


— > 

101 


(nn) — IY ( 




n 




SP^HL 


11 


n 

111 


— ¥ 

001 


SP — IX 


1 1 




101 




1 1 


111 


001 


SP — IY 


1 1 


111 


101 




11 


111 


001 


a 
EL 


1 1 


GQO 


101 


(SP - 1)— QQ" 








if) 


11 


011 


101 


(SP - 1)— IX り 


11 


100 


101 


(SP-2)*-IY, 


11 


111 


101 


(SP - 1)— IY,, 


11 


100 


101 


qq (( — (SP+1) 


11 


QQ0 


001 


q。 L — (SP) 








IX リ —（SP + 1) 


11 


011 


101 


ix, — (SP) 


11 


100 


001 


IY H -~(SP 十 1) 


11 


111 


101 


ブ、 フロック 送 及び、 サー 


チ クルー 




11 


101 


011 


AF--AF' 


00 


001 


000 


(BC)-(BC' ) 


11 


011 


001 


(DE)-(DE') 








(HL)-(H ビ） 








H — (SP + 1) 


11 




011 


し' '（SP) 








IX',— ベ SP + 1) 


11 


011 


101 


ix ; "(sp) 


11 


100 


011 


IY„--(SP+1) 


11 


111 


101 


IY に' ベ SP) 


11 


100 


011 



― 一 f 一、、 ノっ 

― し — ノ ノ 


圭行 内容 


命令 コード 
76 543 210 


し DI 


(DE) — (HL) 


11 101 101 




DE — DE + 1 


10 100 000 




H し *~H し +1 






BC — BC-1 




し DIR 


(DE) — (HL) 


11 101 101 




OE*-DE + 1 


10 110 000 




H し— H し +1 






BC*-BC-1 






BC=0 まて <り なえす 




し DD 


(DE)-(HL) 


11 101 101 




「 

一-— 


10 101 000 




HL*-HL-1 






BC— BC — 1 




し DDR 


(DE) — (H し） 


11 101 101 




DE — DE-1 


10 111 000 




H し し 一 1 






o 

に 

o 






bc=o まてぐ りなえ g 




CPI 


A-(HL) 


11 101 101 




H し し +1 


10 100 001 




BC — BC — 1 




CPIR 


A-(HL) 


11 101 101 




H し し +1 


10 110 001 




BC— BC - 1 






A = (HL) 又は BC = 






0 まてぐ りかえ す 




CPD 


> 


11 101 101 




ェ 

厂 


10 101 001 




BC — BC-1 




CPDR 


A - （H し） 


11 101 101 




H し-" HL — 1 


10 111 001 




BC — BC-1 






A = (HL) 又は BC = 






0^ てぐりな えす 





ADD A. r 


A— A + r 


10 15501 r 


ADD A, n 


A 一 A + n 


11 國 110 


ADD A. (H し） 


A*-A + (H し） 


— n — 
10 國 110 


ADD A. (iX + d) 


A — A + (IX + d) 


11 011 101 






10 國 110 






— d — 


ADD A. (lY + d) 


A — A + (IY+d) 


11 111 101 






10 國 110 








ADC A, s 


A—A + S+CY 


議 


SUB S 


A — A — S 


國 


SBC A.S 


A— A — S — CY 


！ 01V 


AND S 


A 一 AAS 


|1 00： 


OR S 


A— AVS 


閥 


XOR S 


A*-A®S 


[ior 


CP s 


A-S 


画 


INC r 


r*-r + 1 


00 r 國 


INC (H し） 


(H し）— （HL) + 1 


00 110 翻 


INC (IX + d) 


(IX + d) 


11 011 101 




— (ix + d) + i 


00 110 画 






— d — 


INC (IY + 0) 


0Y + d) 


11 111 101 




*-(iY + d) +1 


00 110 國 





実行 内容 


命令 コード 
76 543 210 


DEC m 


m*-m — 1 


画 



R し CA 
RLA 
RRCA 
RRA 
RLC r 
RLC (H し） 



S1--EY] 



L |7 - OMcThI 



DAA 


加 減算 後の A の 内容 


00 100 111 




の 10 進 補正 を 行ラ。 




CP し 


A — A 


00 101 111 


NEG 


A — A" 


11 101 101 






01 000 100 


しし 「 


レ i * "—し T 


nn a a i ill 
UU III III 


SCF 


CY — 1 


00 110 111 


NOP 


何ち 実行され ないか 


00 000 000 




PC の 内容 は インク 






リメ ン 卜される 




HALT 


CPUf き 止 


01 110 110 


DI 


IFF — 0 


11 110 011 


El 


IFF— 1 


11 111 011 


IM0 


割り込み モード 0 に 


11 101 101 




する c 


01 000 110 


IM1 


割り込み モード 1 に 


11 101 101 




する。 


01 010 110 


IM2 


割り込み モード 2 に 


11 101 101 




する。 


01 011 110 




ADD H し. ss 


HL — HL + SS 


00 ss1 001 


ADC H し. SS 


HL — HL + SS + CY 


11 101 101 






01 ss1 010 


SBC H し， SS 


H し— HL — SS — CY 


11 101 101 






01 ssO 010 


ADD IX. DP 


IX*-|X+ DD 


11 011 101 






00 DP1 001 


ADD lY.rr 


IY — IY+ 「r 


11 111 101 






00 rn 001 


INC SS 


ss*-ss+i 


00 ssO 011 


INC IX 


IX — IX + 1 


11 011 101 






00 100 011 


INC IY 


IY — IY+1 


11 111 101 






00 100 011 


DEC SS 


ss*-ss-1 


00 ssl 011 


DEC IX 


IX — IX — 1 


11 011 101 






00 101 011 


DEC IY 


IY — IY — 1 


11 111 101 






00 101 011 




00 000 111 

00 010 111 

00 001 111 

00 011 111 

11 001 011 
00 画 r 
11 0Q1 011 
00 讓 110 



30 



ニー モニック 



RLC (ix + a) 

RLC (IY + d) 

RL m 
RRC m 
RR m 
SLA m 
SRA m 
SR し m 
RLD 

RRD 



実行 内容 




IcyM7 一 OK) 



(HZ 



に ^|3.0| ^ 4|3^0| 



BIT b. r 
BIT り .（H し） 
BIT b, (ix + d) 

BIT D.(lY + d) 

SET D. r 
SET t>. (H し） 

set d. (ix + a) 

SET D. (IY + d) 
RES b. m 



17 4「3 01 (T"^3 di 



"To 



命令 コード 

76 543 210 



-(HL)c 



Z*-(IX + d)n 



Z — (IY + d) D 

r D — 1 

(H しん— 1 

(ix + d) D — 1 
(iY + d) D *-i 
m D *-o 



11 011 101 
11 001 011 
— d — 

oo 10M no 

11 111 101 
11 001 011 
— d — 
00 [000 1 1 0 

剛 
國 
lorn 

[1001 

画 
議 

11 101 101 
01 101 111 

11 101 101 
01 100 111 



11 


001 


011 


01 


D 




■1 


001 


011 


01 


b 


110 




011 


101 


11 


001 


011 




d 




01 




110 


:1 


111 


101 


11 


001 


011 




a 






D 


110 


11 


001 


011 




D 




■ i 


001 


011 


回 


D 


110 




011 


101 


■ ' 


001 


011 




a 




E31 


b 


110 


11 


111 


101 


' ： 


001 


011 




d 


~ > 


hi 


b 


110 


BS 







ニー モニック 



実行 内容 



a& 令 コード 

76 543 210 



J 



ジャンプ グル-プ 


JP nn 


PC — nn 


11 000 011 






*- n 






n -* 


JP cc, nn 


CC ガ賈 のとき、 


11 cc 010 




PC —nn 


n — * 






— n — 


JR e 


PC— PC + e 


00 011 000 
― e-2 ~* 


JR C. e 


C = 0 のとき、 


00 111 000 




次の 命令へ 


― e-2 ― 




C =1 のとき、 






PC*-PC + e 




jr z. e 


Z = 0 のとき 


00 101 000 




次の 命令へ 


*- e-2 ― 




Z =1 のとき、 






PC*-PC + e 




JR NC.e 


C =1 のとき、 


00 110 000 




次の 命令 ぺ 


*- e-2 ― 




c=o のとき、 






PC— PC + e 




JR NZ. e 


Z =1 のとき、 


00 100 000 




次の 命令へ 


― e-2 ― 




Z = 0 のとき、 






PC«-PC + e 




JP (HL) 


PC—H し 


11 101 001 


JP (IX) 


PC— IX 


11 011 101 






11 101 001 


JP (IY) 


PC*-IY 


11 111 101 






11 101 001 


DJNZ e 


B — B-1 


00 010 000 




B = 0 のとき、 


*- e-2 -» 




次の 命令 ぺ 






B+0 のとき、 






PC— PC + e 






CALL nn 


(SP -" — PCm 


11 001 101 




(SP-2)*-PC L 


n — 




PC— nn 


*- n 


CALL cc, nn 


cc ガ IS のとき、 


11 cc 100 




CALL nn と 同じ 


*— n — » 




CC ガ^のと き継統 


— n — 


RET 


PC L — (SP) 


11 001 001 




PC„*-(SP + 1) 




RET cc 


cc ガ S のとき 


11 cc 000 




RET と 同じ 






CC ガ 偽なら ^続 




RETI 


割り込み ならの 


11 101 101 




リターン 


01 001 101 


RETN 


^からの 1 J ターン 


11 101 101 






01 000 101 


RST D 


(SP-1)*-PC H 


11 t 111 




(SP-2)*-PC L 






PC,, — 0 






PC L — D 





； 3/ 





実行 内容 


□p-p-J 一 r- 
76 543 210 




ま 

33 

< 



IN A, \ fi) 


人' r. 


I ， 


U I I 


U I I 


iim r, to; 


r-(C) 


1 I 


n 

101 


~ ► 

1 01 






U I 




UUU 




リ 


1 1 


1 01 
• u I 


i \j i 




匚 
T 

1 




1 uu 






HL*-HL + 1 








INIR 


(HL)-(C) 


11 


101 


101 




匚 


10 


110 


010 




HL — HL 十 1 










B = 0 まてぐ りかえ す 








tND 


(HL)-(C) 


11 


101 


101 




B — B-1 


10 


101 


010 




H し-" H し 一 1 








INDR 


(HL)-(C) 


11 


101 


101 




二 


10 


111 


010 




HL — HL-1 










B=0 まて <り なえす 









二一 モニック 


奪 行 内容 


命令 コード 
76 543 210 


OUT (n), A 


' ' A 


11 010 011 
— n — 


OUT (C).r 


(C)-r 


11 101 101 
01 r 001 


OUTI 


(C)-(HL) 


11 101 101 




B*-B-1 


10 100 011 




HL — H し +1 




OTIR 


(C)-(HL) 


11 101 101 




乙 

二 


10 110 011 




H し *~H し +1 






B=0 まてぐ りかえ す 




OUTD 


(O-(HL) 


11 101 101 




B — B-1 


10 101 011 




H し— HL — 1 




OTDR 


： 

じ 


11 101 101 




B — B — 1 


10 111 011 




H し *~H し 一 1 






B=0 ^てぐりな えす 





(注） 前記 命令 表て 使用して ある sag の 患 味 は 次のと おりて す。 



r, r' 


レジスタ 


dd, ss 


ベア レジスタ QQ 


ベア レジスタ 


DP 


ベア レジスタ 


000 


B 


00 


B C 


00 


BC 


00 


BC 


001 


C 


01 


D E 


01 


D E 


01 


D 6 


010 


D 


10 


H L 


10 


H し 


10 


I X 


011 


E 


11 


S P 


11 


A F 


11 


S P 


100 


H 














101 
















111 


A 















rr 


ベア レジスタ 


： 


ビッ卜 セッ卜 cc 




〕 ンデ イシ 3 ン 








00 




BC 


000 


0 


000 


N Z 


non zero 


000 


00 H 




01 




D E 


001 


1 


001 




zero 


001 


08 H 




10 




I Y 


010 


2 


010 


N C 


non carry 


010 


10H 




11 




S P 


011 


3 


011 


c 


carry 


011 


18H 










100 


4 


100 


p〇 


parity odd 


100 


20H 


A 


: ,^mc> 




101 


5 


101 


PE 


parity even 


101 


28 H 


V 


: SI 理和 




110 


6 


i 'に' 


P 


sign positive 


110 


30 H 


© 


： 排他的^ 理和 


111 




111 


M 


sign negative 


111 


38 H 



s ： r. n. (HL).(IX + a).(IY + d) m ： r, (HL), (IX+0). (lY + d) 

CY ： キヤ 1 J— フリップフロップ m, ： ビッ卜 D 又は ロケーション m 

(ベア レジスタ）,， ： ベア レジスタの 上 位 8 ビッ卜 （ベア レジスタ）， ： ベア レジスタの 下位 8 ビッ卜 

ADC、 SUB, SBC、 AND, OR, XOR、 CP の 二一 モニックに 対する 命令 コード は、 それらの 匚 二の 内 S を ADD ヮルー フの匚 二の 
内容と 入れな え C ものに なり * す。 

DEC の 命令 コード は その [ニニの 内容 を INC ヮ ルーフの (ニコの 內容と 入 n かえ e ものに なり S す。 

ローティ 卜、 シフ卜 クル一 フ及 ひビッ 卜セッ 卜、 リセ ッ卜、 テス 卜ヮ ルーフに おける 命令 コードの [I 二に ついても 同様の 処理 を 行う 
こと を 意味し 》 す。 



132 



.JLIILJLI 

，r 鬥 r 

JLLJL 

，r nr 



,JL 



13 



:e(EXLO.'— 



(□□□uuuoaaaQaoacja 
""'jQQauaaaaaao 

AjaDaauauuLiQD 

JQCQOOODOOQ 



ttfEXLO.' == 

MX coMPtrrm 



,JL LJL し J し 

nr fnr nr 

工 t」L 

nr nr 

,jl||Ljl 
"ir : 「つ r 



I /O (input/output) 



アン タフ ロー (underflow) 



入出力と も 呼ばれる ガ、 イン フッド （入力） と は コンビ 
ユー タ の 中へ 外部から データ や フロ クラム を 入れる こと 
て、 ァゥ卜 プッ卜 （出力） は 逆に 出す ことて す 。また I /0 
ポー 卜と いうの は、 データ や フロ クラム を 出し入れ する 
際の、 物理的な 入 □ と 出口の 総祢 てす。 

アキ ュ Z_i レ一 タ (accumulator) 

累萆 8S とちい います。 CPU 内に 組み こ *れ だ レジスタ 
の ひとって、 演 » 結粜を 一時的に g える メモリー として 
の 《 能の ほな、 アキュ^レータの 内容と 決められ； 5 数 纏 
との 代数 和 をと つたり 、論理 演 g を行ラ ことち てき 5 す。 
まだ K 憶され だ 数値の 桁 送り や、 補数な どの 操作ち 行い 
重要な 役割 を 持って いる レジスター てす。 

アクセス タイ Z_» (access time) 

命令 や データ を メモ U —へ S き 込む、 あるいは メモリー 
なら 読み出す のに かなる 時閭 て、 霾き 込み か 誘み 出しの 
« 号が 出されて なら、 それら を 実行し 始める まての 時間 
をい います。 

アスキー （ASCII) 

り カン スタン ター K -!—►-： プ，— イン フ； f メ一シ 3 ン ザン 

American standard code for information in- 

o- • • ソリ 

terchange の 略。 コンピュータて よぐ 使われる 棵準コ 
—ド て、 アルファ ベッド、 数字、 9 や $ などの 記号 1 2 
8 種頌を 7 ビッ卜 + 1 ビッ 卜の パリティ 符号の 計 8 ビッ 
卜て 表わし だ コードて す。 

ァ セン フラ (assembler) 

0 と 1 の 集まりて 表わされる コンピュータの 命令 コード 
や データ を 人間に 扱い やすいよ うに、 アルファべ ッ卜ゃ 
数字 に 一対一に 対 liS する よう 変換し だ 言語 を アセンブリ 
言語と 呼 ひます。 ァ セン フ 'JHS て 《 成 しだ プロ クラム 
を、 0 と 1 の 符号に 翻訳し なおす フロ クラム ガァ セン フ 
ラと 呼ば； n る フ0 クラ 6 てす。 

アドレス （address) 

メモ 1 J 一 内 を 適 当に 区分して 番号 付け をし G 番地の こと 
てす。 データ や 命令 を メモリーに 塞き こみ、 I* み 出し だ 
りする とき は、 アドレス を 指定す る ことによって 行なわ 
れ ます。 

アナ ログ (analogue) 

ある S を 表わす のに 運 続 的な S を 用いる ことて、 液体 漏 
度 ^や テスターの St などな その 例て す。 デジタルに 対 I© 
する ものて す。 



コンビ ュ一タ 内に 35 いて、 演算 結果な 小さす ぎて コンビ 
ユー タ 内て 扱いうる 数の KH に^たない 状 想の こと。 

インタフェース （interface) 

ふだつ の 装 霤 の 接点て、 偵 報の やりとり をす るた めの 仲 
人の ような 111 きをし ます。 ふつう コンビ:！ 一夕て は CP 
U と 入出力 装霤の 間に はいって、 檇 報の やりとり をス乙 
ース にす る だめの 回路 や プロ クラ^ を 指します。 

インタ一 プリ ター (interpreter) 

メモ'」 一に だぐ わ えられ だブロ クラム 言語 を 順次 取り だ 
して は 解釈し なから 直接 実行して ゆぐ プロ クラムて す。 
代表例 は BAS I C て、 フロ クラ 乙 HS を 一括して 翻 IR 
する のて はな <、 1 プロ クラ ^ごとに 同時通訳して ゆぐ 
特徴 を もっています。 

インタ ラブ 卜 （Interrupt) 

インタ ラフ 卜と は 割 り 込みと ぃラ 意味て すか、 コンビ ュ 
一夕て は ひとつの フロ クラムの 実行 を 中断して、 急ぎの 
処理の プロ クラ 乙 を 動な しだの ち、 まだ 中断し； 5 ところ 
なら 再開す る 一連の 動作 を 指します。 

エディタ (editor) 

コンピュータて エディタと は 編集 フロ クラ 乙の ことて す。 
これ は コンピュータの 中に あらな じめ/ V ソファと 呼ばれ 
る エリア をと つてお き、 キー ポー ドウ 紙 テープなら 入力 
されち データ や プロ クラ 乙に 対して、 必要な 修正 を ほど 
こして、 修正す みの 内容 を だす だめの プロ クラムて 
す。 

ォク タル (octal) 

0 から 7 ま ての 数字 を 使う 8 進数 表示の ことて す。 

r (レ 【ス フ< ウー ジ スサ _ル ザ ンチク i シ 》ン 

L S I (Large Scale Integration) 

大規模 集樓 回路。 1 チッフ 上に 1 0 0 0 涸 以上の 累子^ 
組まれ だ I C を 指します。 マ イワ ロフロ セッサ 'に は 約 
6 0 0 0 個の 素子; 9集« されて います。 

オーバ フロー （overflow) 

コンピュータて »理 するとき、 演簿 した 結果な、 コンビ 
ユー タ 内て 扱いうる 数 鐘の K 囲 を 越えた 状態の こと。 



オブシエ ク卜フ □ グラ Z_i (object program) 



コンパイラ （compiler) 



E] 的 フロ クラ^と ち 呼ば n、 コンビ ユー タ^ 実行て きる 
形式に 並んだ フ 口 クラムて、 機械^て 作られて います。 
ふつう この プロ クラ 乙 を 作り だすに は、 コンパイラ や; P 
セン フラ のよう な 翻訳 プロ クラ ^か 必要て す。 

オフライン （off line) 

ある OHi 末 機器が CPU と 直結して いない 状 想 を 指します 0 
コンビ ユー タを 利用 す る システム を 離: n ていえば、 A と 
いう 檨 88 と B という 機 88、 あるいは A という システムと 
B という シス テ 乙、 そ; H から A という 饯圑と B という シ 
ステ 乙との 罔て、 惰報を 受け 渡 3 ライン ガ結 合さ れ てい 
す、 人+を 必要と する 状態 を 呼 ひます。 

ォ ベレー ティング システム (operating system) 

よ < os と ばれて います ガ、 コンビ ュ一タ 全体 を もつ 
とも 効率よ ぐ 使うた めに、 いろいろの プロ クラ 厶 as と 

^人 機 と 利用者との 閔係 を、 統一的に 管理して 無 IA な 

ぐ 制御 g る e めの フロ クラ 乙の 集 合 を 指します。 つまり 
利用者な E 小 PR の 操作 をす る だけて、 きわめて 機能的に 

シス テ 乙を觔 なせる ょラに 作ら 制御 プロ クラ ^を! g 
眛 3 る ことが 多い ようて す。 

オンライン （on line) 

コンピュータ を 利用す る システムに おいて、 CPU ガ他 
の饯 を 園 接 制御して ffil なせる 方式 をい います。 S 接 制 

御の と は、 ^末 機 s« から cpu まての つな; y>o て、 
人手 を 必要と しない まま、 情報の 受け渡し ガ てきる 状^ 
てす。 国鉄の みどりの 怒ロ や 銀行の キゃ ッシュ ■ カード 
を 利闭 した^ 務 はスン ラインの 代表例て g。 

キャラ ヮタ (character) 



アルファ ヘッド、 カナ 艾字、 数字、 纪 号な ど、 コンビ ュ 
ータガ ぉ« したり 表示し た りする ことのて きる 文字 をい 
い^す。 キャラ フタ • ディ スフ レイ S 圈と 呼ば; n るち の 
は、 通常 キャラクタ を コード < 匕して ROMCE« させて 
おり、 テレビ 画面に 表示 する ことき は、 キャラクタ ジェ 
ネ レー 夕と 呼ばれる 回路 を iffi して、 艾 字; tf 表示され る 仕 
組みに なって お り ま す。 

グラフィック ディスプレイ (graphic display) 

コンビ ユー タ て テレビ 画面に 囡 形 を IS かせる ちの てす。 

コボル （COBOL) 

common business oriented language の 略 0 主と 
してな; 務闲の データ処理 を 目的と して 問 発され だ フロク 
ラム SSS て、 命令 a ガ ファイル 処^に 遇する ようにつ ぐ 
られ ている のガ特 ffli てす。 

コマンド (command) 

Sfi 令、 指令と いろ 意味て すか、 プロ クラムに よる 命令て 
はなぐ、 特に キー ポー ド など 入力装置なら § える 命令 を 
コ 7 ンド といい ます。 



機械^に 近い ァ t ンフ US 語より、 人間の 言 16 に 近い プ 
□ クラム を 使って フロ クラ^ を 組み、 それ を 一括し 
て 機械！? i へ 翻訳す る た めの プロ クラ 乙て す。 FORTR 
AN. COBOL は コンパイラの 代表例と いえ ^3。 

サ フル一 チン （subroutine) 

フロ クラムの 全体 を ルーチンと 呼 ひます ガ、 碟 り 返して 
行なう 部 分 を 1 つの^!、 さな プロ クラ^と して 扱い、 必要 
な 時 その フロ クラ^ を 何度 てち 実行 てき るよう に しだ も 
のをサ フル一 チンと いいます。 BAS I C の プロ クラ^ 
て は GOSUB とい ラ 命令て 指定され てサ フルー チンへ 
移り、 RETURN とい ラ 命令て 元の フロ クラ^ヘ^り ま 
3。 フ 口 クラ^の 接り 返し を 省き、 メモリー を 節約す る 
ことが てき^す。 

CPU (中央処理装置） 

f >；|, "Tnt?"' シンク' コ：" 'ト 

central processing unit の 略。 コンビ ュ一タ の 演 
n - 制御機 能の 心滅 86 分て す。 マイクロ コンビ ユー タの 
C PU を マイ フ ロブ ロセ ッサと 呼 ふこと も ありま 3。 

シミュレーション （simulation) 

ある 現象 や 変化 を棂型 化して、 模型 ガ どう 反 するな を 
数学的に 表^して 分析す る ことて す。 大き < いえば 占い 
もシ S ユレ 一シ ヨンの 一機て、 特に コンビ コータ て 実現 
するとき、 コンピュータ 'シミュレーションと 呼ばれ 3： 

g。 物 まねと 覚えて おけば わなり や g いてしょう。 

スタック （stack) 

スタックと は 棚と い" 5 意味て、 ある データ を I 幀 V に まね、 
取り出す とき は 最後に S ねだ もの、 つまり 上の 方なら 顺 
ク にと るよ O になって い 5 す。 コンピュータて はサ フル 
一 チンなら の 戻り 番地 を 記 憶す るた めに 用したり しま す 0 

ス卜 リング (string) 

ス 卜り ンクと は 糸、 一連、 一列と いう 窻味ガ あり、 コン 
ビュー タては 文字の 列 を挹す こと ガ 多い。 たとえば" フ 
ジ サン 八 タ カイ" という 文字 も コンビ コ 一夕て 処理 
3 ると きはス 卜 1 」 ンク として 扱わ ri ま g。 

ソーティング (sorting) 

与えられ だ データ を ある 目的に 治って、 特定の 《iS に 並 
ベな える こと。 E とえば 数の 大きさの 鹏、 アルファ ぺッ 
卜麟、 1 定の頃 目の 順な どに 並べな え 分！ eg る ことて す。 

ソース ブ ログ ラ Z_j (source program) 

ス フシ エワ 卜プロ クラム （機 械8§ プロ クラ 乙） と 比 し 
て晔 ばれる ものて、 ふつろ は 機械 5S に 翻訳す る 前の フロ 
クラ Z_i のこと。 S 水準な 言 IS (たとえば FORTRANk 
COBO し あるいは アセンブラ SIS など） て » なれ G フ 

□ クラム を総祢 し、 いつ e ん機械 as へ 翻訳し なければ コ 

ン ビュー タ て 実行す る こと はてき ません。 



タイム シェアリング (time sharing) 

B§ 分 81 とちい います。 1 S の コンビ ユー タを、 同時に 多 
ぐの 利用者に 使える ような システム を さしてい ます。 た 
とえば テレ タイフて データの 入力 を 行なう とき 早ぐ て も 
1 文字 あ X： りせ し 、ぜぃ 0 . 5 杪 ほどの 時間な かな り ます ガ 
コンピュータの 処理 はすつ と 短時間て 済ん てし S し ほす。 
それて、 複数 @の ターミナル を 時間 を 区 CD つて 使い、 見 
かけ 上、 同時に S ぐさん の ター S ナルを 利用す る こと ガ 
てきる のて す。 

タ一 ミナ ル （terminal) 

人間の 手に よって コンピュータに 情報 を さえたり、 情報 
を コンビ ユー タ なら 受けと る!! W 末 g 置の ことて、 キー ポ 
ードゃ 力せ ッ卜テ 一 フレコ ータゎ フラウ ン管 ディ スフレ 
ィ、 あるいは テレタイプ、 フロッピーディスク などち タ 
一 S ナルと 呼ばれます。 

ディスプレイ （display) 

フラウ ン 管の 画面に 文字 や S 形 を 表わす 装 » てす。 »密 
に は CRT ディ スフ レイ、 TV ディ スフ レイ、 フラウ ン 
管 ディスプレイ などと 使います。 

デジタル (digital) 

ある 靈を 表わす のに 数 S を 用いる ことて、 デジタル 畤 Sf 
のように、 時刻; tf 数字て 表現され ま す。 こ れ に反して、 

砂時計 • 曰 時計の ように 連続 的な B て 表わさ; n るの な、 
アナ ロク と 呼ばれます。 

^—9 (data) 

コンピュータて 処理す る 目的て、 アルファべ ッ卜、 数字 

などに より 表現 さ; 集まり を 指す。 ふつ ラには プロク 
ラムに 対して、 プロ クラ^に よって 処理 さ; n る 数個 や 文 
字 列の ことて す。 

テレタイプ （teletype) 

コンビ ユー タ 'ター 5 ナルの ひとって、 電信 回路 を 使って 
情報 を キー入力したり、 送ら れて 来 CtS 報 を 文字に il し 
て 印字す る 機能 かあります。 

デバッグ (debbug) 

パックと は 「虫」 のこと て、 デ パックと は 「ffl 取り」 の 
こと。 転じて、 プロ クラム 上ての 5 スを 見つけだし、 修 
正す る ことて す。 

二一 モニック コ一ド （mnemonic code) 

ァ セン フ' JB 語の 命令 コードの こと。 0 と 1 の^^りて 
表わさ; H る マイク 0フロ セッサ の 命令 73 号 を、 人間に わ 
かりやす いよ ラに 記号 化し C ちの てす。 

パイ 卜 （Oyte) 

8 ビッ 卜の 大きさの 構 報靂を 1 バイ 卜と いう 犖 位て 表わ 
しま す。 



バイナリ (binary) 

2 it 数の ように、 0 と 1 とて データな ど を 表現す る 方法。 
コンピュータ 内の 信号の 取り扱い はすべ て/ X イナ 1 J て f5 
なわれ ています。 

パス (bus) 

田 線と も 呼ば； n る 線路の 束て す。 バス は 大別して 3 つ あ 
り、 データ を 送る データ パス、 ァ ドレス 指定の C めの ァ 
ドレス バス、 データ を どう 処理す るか を 制御す る ための 
コン卜 ロール/ •( スガ あります。 

バッファ （buffer) 

コンピュータ 内の 各 S 騮を つなぐ/ X スの 途中に 霾な れデ 
一 タ1£ 送の IS 整 を行ラ ちの てす。 両 75 の 装置の 15 送 速度 
の 違いに)； 5 じて、 歩 ffl を 合せる 役目な ど を 持って います。 

BCD (2 進化 1 0 進数） 

Dinary coded decimal number OfflSo 1 0 進数の 
各 桁の 数字 を 4 ビッ 卜の 2 理数て 表わして 並べ S 数 。1 0 

遒 数との 変換に 便利な 形て すガ、 e とえば s 常の 2 mm 

16 ビッ 卜て は 1 0 進数の 0 なら 6 55 3 5 が 表わされ 
るのに 対して、 BCD1 6 ビッ 卜て は 0 なら 9999 ま 
ての 1 0 進数し な 表わせな いのて、 大きな 数の 取り扱い 
に は 有利て はあり^せん 0 

ビッ卜 (bit) 

ラン フか点 O し たり 消えたり、 スィッチ ガ 接続され; 5 り 
開い だり といつ た電 気 信号の 状態 は、 あれ か— これな、 
スン- オフ、 資 —偽の 二者 択一 の 状 想 を 表わします。 こ 
れ を惲 報の 輋位 とすれば わなり やすぐ、 世界中て 話し合 
つて 決めら； HE のな ビッ 卜て す。 り It と は Dinary (2 
it の） digit (桁） の 略て、 だとえば 8 ビッ卜 は 2!1 数の 
8 桁て 表わされる 捅 報の 大きさて す。 

PROM (programmatile read only memory) 

再霱き 込みの てきる 読み出し S 用 メモリー のこと。 いつ 
だん 霱き 込まれ C 内容 を 消す に は、 紫外線 や X 線の 光ェ 
ネル ギーを あてる 方法が よぐ 使われます。 

ファイル (file) 

ある 目的の £ めに 組織的に 集めら れ だ 情報 をい います。 
利用 法なら 大別す ると、 シーケンシャル ファイルと ラン 
タ乙 ファイル かあります。 シーク ン シャル ファイル は、 
ファイル 内の 記錄ガ 一定の 順^て 並ん てし 、るち のて、 磁 
気 テープの ファイル; ^ 代表的て す。 まだ、 ランタ Z_! ファ 

ィルは ファイル 内の ie 錄順 序と は 関係な ぐ 、 任 s の ss 錄 
を 取 り 出したり、 任意の 位匬に 塞き 込んだり てきる もの 
て、 フロッピーディスク ガ 代表的な ちの てす。 

フォー 卜 ラン （FORTRAN) 

- - 

formula trans ほ tor の 略。 主として 科学技術 StS 用に 
間 発され だフロ クラ 乙 BSS て、 r ム IBM の fitiSiC を S 通の 
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— > 



れは 




ん 




まえば、 



\ 



再度 




'又 曰 



き 込む こと は 原 貝 




鼴き 込んで 
可能な メモ 



ボ 



(baud) 



、、 



フ 



タゃ命 



などの 情報 を 送 




きの 速度 を 表わす 単位 




1 秒 間に 送られる 情報の ビッ卜 数て 示 




ます 
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ん 吹き込まれ 
され、 




曰 



燊は 



\ 




ド盤ガ こわれる まで 保持 




ません 



o 



R 




記憶 させ 





報 は 電気が 切られても 忘れない ように 作られて いま 



ば 1 2 0 0 ボーと いえば 



\ 



8 ビ 




タガ 1 5 0 個 



す 



〇 



1 秒 間 




と を 表わして います。 
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ダ 



(loader) 




(memory) 



大 




のデ 



夕 や 命令 を 記憶す る 装 




〇 




タの 内部 記憶 装 




れ ています 



〇 



カセ 
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は 



フ 



C の R〇M と R AM ガ用 





\ 
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外部 記憶^ 

ロワ' 





の 情報 を 内部 記憶 装 




—？ ― 



5兀办 込 0J 




めの ブ 






夕に 内蔵され ています。 力 





からの ロード を はじめ 



紙 




ゃフ □、 
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フ 




からの O 




き 実行す る 




□ 





てす 



〇 




呼ばれる メモり 



は 外部 記憶装置 



憶され る 情報 は 0 と 1 の 2 進 




o 




つ 記 




記憶され る 場所 は 



フ 



K (word) 





ドレス ( 




旨定 されて います。 



タ 



(monitor) 





位をヮ 




ードま 

タ内の 



記憶て き 



ゝ、 




夕の 単 




は DO 




ます 



〇 



ヮ 



ドの 大きさ はコン 



、、 



タの 単位 




ます。 





タの 操作 を 





ヽ 




ま 動か 






を 効率よ ぐ 使う 




め ( 
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S 意され 






ある 



きヮ 



ドの 大きさが 8 ピ 



\ 




— > 




ガ 



《 




されます。 



の 




す 



〇 



もう、 コンピュータ を あなたの 頭 脇の 一部で でも あるかの ように、 自由に 使える ようになりまし^ 力、。 
ェ？ 忙しくて じっくり 取り組む 時間が なかなか 作れない、 です つて？ お 互いに 生きる ために は 本 
当に せわしない 世の中で すね。 、 

というの はいかが てしょう か？ ここで は 例に、 曰 本人の 平均より 少し 長目に 生きる ものと し、 人生 80 年 
として 計算して みました。 学校 は 小 ♦ 中 • 高 • 大学と 16 年間、 1 年に 245 曰 登校し、 1 曰 5 時間 授業 を 

受けます。 帰宅 後 は 1 曰 も 欠かさす 1.5 時間す つ 自習す る、 という 真直 目 青年。 そして 大学 を 出てから 
は、 サラり 一 マンと して S 年 245 曰 間 8 時間 勤務 を 続ける ものと します。 
1 曰の 睡眠時間 は 8 時間、 1 年 を 365. 24 曰 として 計算して みました。 



いかがて すか、 人生 80 年の 間に 勉強 をして いる 時間 は 合計 4.1 %、 仕事 をして いる 時間 は 10.6%。 で 
あなた ご 自身の これからの 時間の 使い方、 もう 少し こまかく 分析し 予測して みたらい かガ でしよう。 
のとき は、 コンピュータ を 相手に する 時間 も ぜひ 入れて おいてぐ ださいね。 




\ 





MZ— 80 シリーズ BAS I C SP— 5 0 30 の 仕様 を まとめて 示します。 

1 . 形式 

中間 言語 形式 インタープリタ、 大きさ ： 約 1 4K パイ 卜、 先頭 アドレス： $1 2 0 0 番地 

2. 数値 データ 

浮動/」、 数 点 形式、 有効数字 8 桁 xi o'' g の 実数 

実数 範囲 ：0. 27 1 05055E— 1 9〜0. 92233720E+19 

1 6 進数 ： L I M I 丁、 POKEs PEEKv USR の 各 コマンド において 直接 1 6 進 番地 を 

指定す る 場合に のみ 使用可能て あり、 1 6 進 4 桁の 前に '' S " マ一 クを つけて 示し 

ます。 

(例） LIMIT $8FFF、 USR ($ AO 0 0、 X $) 

3. 数値 変数 

数値 変数の 種類 ： 数 纏 変数、 1 次元 配列 数備 変数、 2 次元 配列 数値 変数 

(1) 数値 変数 変数 名 は、 はじめの 2 文字が 有効て す。 まだ、 はじめの 文字 は 

英文 字 を 使わな ぐて はなり ません。 特殊 文字、 あるいは、 BA 
S I C て 使用して いる キーワード または、 キ一 ワード を 含む 名 
前 を 使う こと もてき ません。 
(例） A、 X、 F1、 AA など は 可 

ABC と A BD は 同じ 変数と みなします 

DATAs XDATAs A# など は 不可 

(2) 1 次元 配列 数 纏 変数 …… 配列の 最大 は 2 5 5 まてて、 D I M によって 配列 を 定義し な < 

て はな り^ せん。 （1 ) の 数値 変数と 同様の 条件て 変数 名が 決 
めら れ ます。 配列 は カツ コ 内に 添字 を 置いて 示します。 
(例） DIM Q (1 00) によって Q (0) から Q (1 00) まて 定義され 
ます。 

(3) 2 次元 配列 数値 変数 …… 配列の 添字 を 2 つちつ 変数て、 各 添字に ついて 定義て きる 配列 

の 最大 は 2 5 5 まてて す 力 \ メモりの 使用 状態に よつ で 制限 さ 
れる ことになります。 
(例） DIM A1 (7、 7) によって A 1 (0、 0) から A 1 (7、 7) まて 
8 x 8 = 6 4 の 配列 要素 を もつ 2 次元 配列 A 1 ( 、 ） ガ 定義され ます。 

4. ス卜 1 リング デ~9 

ス卜 リンクの 最大 長 ： 2 5 5 文字 

ス卜 | リンクて 扱う 内部 コ一ド ： 各 文字の ASCii コード 列、 終端に キャリッジ 1 リターン コード 

0DH がっきます。 

5. ス卜 リング 変数 

ス 卜 1 」 ンク 変数の 種類 ： ス 卜 1 」 ンク 変数、 1 次元 配列 ス 卜 1 」 ンク 変数、 2 次元 配列 ス 卜り ンク 

変数 

ス卜 リンク 変数の 形式 ： ス卜 1 J ンク 変数 は、 数 纏 変数の 場合と 同様の 条件て 選んだ 名前に $ 記 

号 をつ ける ことによって 表現し ます。 

変数 名の 規則、 配列 型ス卜 リンク 変数の 定義な ど は、 数 纏 変数の 場合 
と 同様 

(例） A$、 ST$、 N I $ は 通常の ス卜 リンク 変数 

NAME 1 $ と NAME2$ は 同じ ス卜 リンク 変数と みなします 

T I $、 CHR$( ) など は 特殊 ス卜 リンク 変数 

DIM S$(3、 3) によって、 S$(0、 0) から S$(3、 3) まて 4x 

4=1 6 の 配列 要素 を もつ 2 次元 ス卜 リンク 配列 S$( 、 ） が 定義され 

ます。 



6. その他 ®tt 様、 定数な ど 



(1 ) 
(2) 
(3) 
(4) 

(5) 



(6) 
(7) 
(8) 

(9) 

(10) 



(11) 



文 番号 ： / ！〜 6 5 5 3 5 の 間て 使用て きます。 

LOADs VER I FYs SAVE における ファイル ネ一 乙の 有効 衍数 ： 最大 1 6 文字 
CURSOR X、 Y コマンド における X と丫 ： X = 〇〜39、 Y=0〜24 
SET X、 Y または RESET X、 丫 における X と Y : X = 0〜7 9、 丫 =0 
〜49 

T I $ に 代入て きる ス 卜 1 」 ンク ： 6 桁の 1 0 進数の ス卜 リンクて あり、 最初の 2 文字 は 
" 0 0 "から" 23 "まて （時間 を 表わす）、 次の 2 文字 は'' 00" から'' 5 9" まで (分 
を 表わす） 最後の 2 文字 も " 00 "から" 59 "まて （秒 を 表わす） となって います。 
FOR …… NEXT ループの ネステ インク ： 最大 1 5 まて 重ねる ことが 可能 
GOSUB による ネステ インク ： 最大 1 5 まて 重ねる ことが 可能 
DEF FN による 関数 定義に おける 関数 定義の ネステ インク ： 最大 6 まて 重ねる こと 
ガ^ 能 

I NP、 OUT 命令に よる 入出力 ポー 卜 アドレス ： 0〜239 (1 0 進数） 



揷入 ■ 削除 キ一 



ス ベース キー ISP 
かあります。 

円周率 7T の 値： 7r=3. 1 4 1 5927 



1 0 進数て 〇〜2 5 5 


] ール キー 


CURSOR 


CURSOR 


CLR 1 
HOMEh 


I NST 
DE し 


の 各 キーに ついて オード 1 」 ビー 卜 機能 



140 



棚 

SERIES 



棚 

SERIES 



v/^-7/ 0 m^^n 国内 家電 営業 本部 システム 機器 営業 企画 部 

©545 大阪市 阿倍野 区長 池 町 22 番 22 号 電話 (06) 621 — 1221 ( 大代 表） 



^れ- 7。 株 ^会： H 

本 社 ®545 大阪市 阿倍野 区長 池 町 22-22 

電話 (06)621—1221(大<^) 

産業 機 88 事業本部 ©639-11 奈良県 大和 郡 山 市 美 》庄 町 492 
«g( 07435)3 — 5521(大<"^) 



： ル-ス ェン: /二 アリン マ 



北 ffia ェンジ 
北 ェンジ 
越 ェンジ 
京 ェンジ 
陸 ェンジ 
部 ェンジ 
被 ェンジ 
国 ェンジ 
国 ェンジ 
州 ェンジ 
沖 繩シ ヤー 



ニァ 1 リンク 
ニァ リンク 
ニァ リンク 



ニァ 1 リンク 
二 アリン ヮ 
二 アリン ク 



二 アリン ヮ 
フ 電機 肺 



mm 札 幌市西 区 24 軒 1 条 7 丁目 3-1 7 号 

®983 仙 台 市 萩 野 丁目 8S 地 9 

®320 宇都 宮市 不動 前 4 丁目 2 番 41 号 

®114 東京都 北 区 荣田端 2 了 目 13 番 17 号 

©921 石川県 石 川 IB 野々 市町 字 御経塚 1096 番地の 1 

®454 名古屋 市中 川 区 山 王 3 丁目 5 番 5 号 

®556 大阪市 浪速 区 患 美須西 1 丁 §2 番 9 号 

©731-01 広 島 市 安佐南 区 祇園 町 大字 西 原 2249 の 1 

®760 S 松 市 木 太 番地の 3 

©816 福 岡 市 稱多区 井相田 2 丁目 12 番地の 1 

mm 沖 繩県那 R 市鼴 2 丁目 10 番地 1 



SS( 011)641 -4649 
電話 (0222)96— 4649 
SB( 0286)35- 11 51 
SB (03)800-1221 
電訓 762)49— 棚 
SIS( 052)322 - 4649 
電 IS (06)643 - 4649 
082)874 - 2281 
鸳話 (0878)33 - 4649 
電話 (092)572 - 4650 
«SS( 0988)62 - 2231 



: / セ -7。ts/ ネス 株^ 会ネ土 



©545 大阪市 阿倍野 区長 池 町 22-22 電話 (06) 621 — 1221 ( 大代 表） 

©162 栗 京都 新 宿 区 市 谷 八幡 SI8 番地 電話 （03)260 — 1161( 大代 表) 

暴 063 札 幌市西 区 条 7 丁目 3 番 17 号 SB( 01 1)641 -3631 

®983 宮城県 仙 台 市 萩 野 町 2 丁目 8 番地の 9 電話 (0222)94 — 3247 

暴 130 東京都 墨 田 区 石 原 2 丁目 12 番 3 号 mm (03)625-5111 
®280 千 葉 市 南 町 1 丁目 5 番 20S 0472) 63 -4043 

®235 横 浜 市 88 子 区 中原 1 丁目 2 番 23 号 «SS( 045) 751 -3215 

®330 闳玉県 大宮市 宮原町 2 丁目 107 番地 2 号 電話 (0486)63 - 5159 

®320 宇都 宮市 不動 前 4 丁目 2 番 41 号 電話 (0286)37— 3576 

©950 新 潟 市上 所 中 1 丁目 7 番 21 号 電話 (0252)83 - 1795 

©454 名古屋 市中 川 区 山 王 3 丁目 5 番 5 号 電話 (052)332 - 2631( 代表） 

®921 石川県 石 川 郡野ク 市町 御経塚 1096 番 1 号 電話 (0762)49 — 1240 

©556 大阪市 浪速 区 恧美須 西 1 丁目 2 番 9 号 電話 （06)643— 3021( 代表） 

®601 京都市 南 区 上 烏 羽 S 田 町 48 番地 犟話 (075)681— 4361( 代表） 

暴 658 神 戶市東 葡 区 魚 崎 北 町 1 丁目 6 番地 18 号 電話 (078)431 — 4361( 代表） 
嚳 731-01 広 島 市 安佐南 区 祇園 町 大字 西 原 2249 番地の 1 電話 (082)874- 4925 

®760 香川県 S 松 市 木 太 町 1861 番地の 3 電話 (0878)33- 4255 

®816 福 岡 市 博 多 区 井相田 2 丁目 12 番地の 1 電話 (092)572 — 2611 

®900 沖繩県 ■ 市 曙 2 丁目 10 番地の 1 電話 (0988)61 — 7360(tt^) 



お客様 ご 相談 窓口 
北 海道 （011)642-4649 
東 京 （03)893-4649 
近 m (06)643-4649 
九 州 （092)572-4649 



東 北 （0222)96-4649 
北 陸 （0762)49-4649 
中 国 （082)874-4649 
沖 m (0988)62-2231 



m 漏 6)35-1 151 
部 (052)322-4649 
国 (0878)33-4649 



栗 関 栗 北 中 近 中 四 九 



部 店 店 店 店 店 店 店 店 店 店 店 店 店 店 店 店 店 

支 支 支 支 支 支 g 支 g 支 支 支 支 支 支 支 支 

幌台 京葉 浜 玉變^ ^沢阪 都 戸島 忪岡繩 

販札仙 東 千 襆埼宇 新 名 金 大京神 広 S 福 沖 



関 中 四 



Wtr- To 株 



